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Several nonths ago n cooperative organisation cf 1103A users was 
formed under the name cf USE - Univac Scientific Exchange. The early 1103A 
purchasers desired to go beyond the Central Exchange with its voluntary ex- 
change of completed routines t.nd actively cooperate in the early stages of 
program planning and assignment cf programing rr.anpcwer. A description of 
this organisation is enclosed. 

Abstract cards ore now available fcr all Central Exchange routines. 
Sets of these are mailed outci t-.tical'y to all 11C3 installations. Additional 
sets will be supplied upon renuost. 

The "Ilctes on the Truing cf the Con -rolled Reproducer " which were 
cr.itted froiii the last Newsletter ere enclosed with this clg 



Peggy Johnson /' 
Systems Analysis Department 
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CONVAIR The revised version of FLIP is now available. This 
program, FLIP III, is compa table with the old but 
is better than 20$ faster. A great deal of the de- 
scription of FLIP has been rewritten to render it more 
comprehensible on first reading. The subroutines which 
are in FLIP to date are listed as enclosures. A plastic 
encased card with all FLIP commands and the constant pool 
is being prepared for use at Convair. A reasonable number 
of these will be supplied to others upon request. 

A recent addition to FLIP is a package consisting of an 
alarm routine, an octal print routine, and a Flexprint 
routine. The octal and flexprint subroutines afford a 
number of choices as to format and what portion of the 
accumulator is printed on the typewriter. Another addition 
is the Double Entry Table Interpolation and Lookup wh ich 
uses parts of FLIP. 

A magnetic tape corrector routine. MOCK VIII has been 
written to facilitate changes in programs stored on 
magnetic tape. The changes are read from punched cards. 

Charles Swift writes that Convair is considering a new 
use of the interrupt feature with their 1103. They propose 
achieving a simplified general trace by using the External 
Function instruction to initiate a "delayed interrupt". 
If the time delay is just long enough to permit one jump 
to be executed before the interrupt signal, a trace 
routine can set up the interruption of the next main 
routine command. 

Editorial Comment: To illustrate, assume the trace 
routine is at addresses w through w+n and the program 
which is to be traced is stored beginning at address v. 
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F3 RJ w+n w 



w 

Trace routine 

w+n-1 EF oc . $ 

w+n KJ v 



1 



Routine to be traced 



Tracing would operate as follows ; Start the computer at address 
w+n-1. The "delayed interrupt" is set up and control is trans- 
ferred to address v by the jump in w+n. During execution of the 
instruction at the v the interrupt occurs and control is returned 
to the trace routine by means of the Return Jump in *V 

This method of achieving a "hot trace" provides an exceedingly 
ta simple means of tracing jump instructions. However, since neither 

J, the Repeat instruction nor a repeated instruction can be interrupted, 

g£ they will not be traced. The jump in F-^ which terminates the 

p repeat sequence is traced so that the end result of the repeat 

M is recorded. In many cases this will have the advantage of 

^ eliminating copious and unnecessary output (such as during block 

transfers and table look-up). 
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go 1 '/-:■■:: I;-.. • routine has bo..;n vrittcn, 



'.!.,,_- ..-,. x ul-..- i:uu; ; . .-. L.ically Lj^ps track of the position 
of ilm rmaing head cf each of the magastic taps units 
prcvI.Ll.ia a Return Jump to the blcclc counter routine 
is uritten after each magnetic tape order* 

- — - Title 5-brcvtir,:; has also boon submitted for 
distribution* Tula routine uas designed to allow the 
programmer wishing tabular output to make use of punched 
card equipment to produce quickly a noat printout cf 
floxablo format. The routine converts alpha-numeric 
inf crmm Lion in Floxowriter code into IRI! coda on cards 
for use as page headings ccIul-lii headings, and Una titles, 
Those cards, together with data Cards, can bo listed 
to produce -tabular formats, for example, on the IBM 4-07 «> 
Input is the Floxowriter cedes packed 6 to an 1103 uord© 

Output is cards punched on the Controlled Reproducer* 

i 

R^mC-ba^TIRmTGF A change has been instituted x/ith regard to most 
service routines. The 40000 entries to service routines 
were provided for flexibility in moving routines about 
on the- drum. However, the program entry depended on 
the location of the routine and hence invalidated this 
facility. Therefore cell 40020 is now reserved as a 
common progrem oxito Since the basic cede is unchanged 
except for allowing for this procedure, only the revised 
descriptions are published- herein and not the codings. 
The ceding way be obtained upon request. The following 
service routines have been amended! KI-73, The Flex- 
owritsr llsmoi>y Durao; TTJ-90, The Bioctal liemory Bump; 
RV-lOO, The Octal Card Dump; RTI-102, Changed llord . 
Post-1 lor tea | Ra T -92, Storage to Magnetic Tape Transfer; 
R TT -93, Magnetic Tape to Storage Transfer^ RU-103, 
Binary Ccrd Read-In j R T .-63, Ferranti Input Routine; 

-In addition to maintaining the library for current 
operation thought is being directed to the anticipated 
installation of the model 1103A, This includes the 
preparation of a two pass assembly program and further 
mechanisation, of the program checkout procedure, Soma 
changes may also be iriade in the Routine Library structure*, 

A nuirber of examples have been run to test the new Linear 
Matrix Roamblcn Solver . 1 la trices of order up to 16 have 
to been inverted. Accuracy for the largest matrix (si^e 16) 

g was approximately 7 to 8 places. This routine is now 

o* being prepared for distribution, 

*j An integral root routine is checked out as is a "Hot 

Trace" for CHAP. The former Is enclosed with this 
Uevjsletter, 
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Anothor fixed point Definite In tegral Evaluation 
Routine is now available. The difference between 
EW-89 and this routine is that the error terms are 
of fourth and fiftii order respectively. There is also 
a floating point version of this routine. Fixed point 
logarithm and exponential routines are also enclosed. 

The revised write-up of the Ramo-Wooldridge One Pass 
Assembly Routine (K17-72) which is in Newsletter 7 
should be corrected to read w ... the routine prints 
GMP-0" in the last sentence of paragraph 2 page 9. 

A routine has been coded which reads fixed point decimal 
numbers from cards, converts the numbers to their octal 
equivalents and stores them in the computer at locations 
specified by a base address and the location number 
on the card. 

Copies of "An Integrated Computation System for the 
ERA-1103 B are available upon direct request to Dr. 
Walter Bauer. This is the text of a talk presented 
to the Association for Computing Machinery National 
Meeting at Philadelphia in September 1955* 

A complex arithmetic version of SNAP (the Floating 
point arithmetic package) has been checked out. Also, 
a Fixed Point Card Output routine has been prepared. 
Work Is now progressing on an algobric equation solver 
which will find all real and complex roots. 

REMINGTON MN D^UNIVftC For several months now we have been op- 
erating the Serial 9 1103 computer her© in St. Paul. 
One of the principle uses of the computer is for mechan- 
ized computer design. The ■ ' 3ign process consists of 
formulating e:qprc:;sions for the logic of a computer 
system, simulating this logic with an 1103 program, and 
assigning physical specifications of the designed 
system, also by means of an 1103 program. A number 
of programs have been prepared to facilitate the auto- 
matic processing of equations expressing the logic 
of a computer system. Such tacks are performed as 
verifying the equation structure with regard to rules 
regulating the formulation (such as timing restrictions, 
number of inputs to a core, etc.) and sorting equations 
with respect to various criteria. The processes of 
simulation and preparation of manufacturing and mainten* 
ance aids are all ost entirely mechanized. 1103 pro- 
grams simulate whichever logical operations have been 
selected to be chocked by choosing the equations involved 
in the operation and effecting the actual function of 
the appropriate components in the equations. Manufacturing 
aids which are produced by the 1103 programs are parts 
lists, wiring tabulation forms, assignment of unit 
assembly positions to type card3, and assignment of 
relative positions in the completed system to the unit 
assemblies. The programs are coded to effect the most 
efficient but realistic solution to a manufacturing 
problem which allows several solutions. 
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A description of this mechanized design process is 
available upon request. / 

Enclosed with the last Newsletter was a description 
of the use of the ••dead Space" on the magnetic drum 
for storage of loading routines for the Model 1103A 
computer. A routine has been coded for storage in 
the dead space which simulates the MT STkRT of the 
Model 1103. That is, one block of 120 words is read 
from tape unit 1 to core storage starting with address 
00001* The computer stops following the transfer 
to permit switching from ABNORMAL DRDM to NORMAL DKOM. 

The following is extracted from a report from Leon 
Dominick of the Convair maintenance crew: 

•A table of failures has been compiled concerning the 
reliability of the non-diagnostic test at the Convair 
installation. The period of time covered by this table 
is 15 December 55 thru 15 February 56." 

"The non-diagnostic test was run with reduced heaters 
and margins after every preventative maintenance period 
and before Convair went on the machine. At no time 
did failures occur during these tests when run with 
margins and reduced heaters as appropriate to each 
part of the test. 1 " 

"Convair has been running the non-diagnostic test, 
on their time, on an average of twice per 24 hour period, 
whenever they suspected machine trouble without definite 
evidence to support their suspicions. * 

"The table lists 18 times when the non-diagnostic test 
failed for Convair. With two exceptions, a malfunction 
of the computer wqs located which caused the test failure. 
In those two instances where failures of the test occured 
with no trouble found, it is believed the failures 
were of a very random nature, and that they were caused 
by arcing of the 300 volt generator. On only one occasion 
did the non-diagnostic test fail to show an error when 
the error was obvious through examination of the indica- 

w tors on the maintenance console. This error was a failure 

J to write in one digit on drum." 



W 



"Convair has gained enough confidence in the reliability 
of the nondiagnostic test to usually agree to its use 



e* as a check on the reliable operation of the machine. * 
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The following question was raised here concerning 
the conversion of floating binary numbers to floating 
decimal for output on the High Speed Printer attached to 
the 1103A: is there actually sufficient time avail- 
able within the print cycle for the 1103A to convert 
these numbers when the printer is operating at the 
rate of 600 lines per minute? A conversion routine 
has been written which prints eight numbers per line. 
Each number consists of an eight digit mantissa with 
sign and a two digit characteristic with sign. The 
average time to convert and set up a line or blockette 
is 35*3 ms. (For decimal numbers between 10 -lO and 
10 *®)* The maximum time to convert and setup a line 
or blockette is 5A»A ms. (For decimal numbers 10 )• 
Since 90 milliseconds are available for computation 
during the print cycle, the output rate is definitely 
printer-limited. In fact the rate of output is at least 
doubled by recording on magnetic tape for off-line printing. 

The method of conversion is as follows! the mantissa is 
scaled 2^" while the binary characteristic is reduced 
to zero. A count of the decimal characteristic is retained 
while the binary characteristic is reduced. By using a 
split positive entry with a shift of two. followed by a 
Split, add . with a shift <£ one, the mantissa is multiplied 
by ten, A repeat of these instructions seven more times 
yields an eight digit decimal mantissa. By use of the 
split commands, six decimal digits are placed in each 
output word and the excess threes added to produce the 
proper Univac codes 

ftHITE SANDS An Octal Card Reed routine has been coded which 
reads from cards containing any number of octal words 
from 1 to 6. An Octal Card Dump is also completed* 

A short routine has been devised for checking the accuracy 
of a paper tape prepared on the High Speed Punch. After 
the bioctal tape has been punched, this routine will 
read the tape and compare it with the contents of storage 
from which the tape was punched. Any discrepancy results 
in a printout of both the correct and incorrect words. 



vii 



NEWSLETTER NUMBER 8 
February 1956 



ENCLOSURES 

CV-109 
0&-110 
HW-1H 
RW-112 
RW-113 
RW-1U 
CV-115 
RW-116 
RW-117 



MQCK VIIL-a magnetic tape corrector routine 

Magnetic Tape Block Counter Routine 

Fixed Point Definite Integral Evaluation 

Floating Point Definite Integral Evaluation 

Fixed Point Natural Logarithm 

Fixed Point Exponential (e x ) 

Alarm, Octal, and Flexprint Package 

N^k Root Routine 

Fixed Point Decimal Card Read-In Routine 



REVISIONS 

RW-73 
RW-90 
RW-100 
HW-102 
RW-92 
RW- 93 
RVJ-103 
RW-63 
CV-11 



to 

<j 

o 

ON 



Flexowriter Memory Dump 

Bioctal Memory Dump 

Octal Card Dump 

Changed Word Post-Mortem 

Storage to Magnetic Tape 

Magnetic Tape to Storage Transfer 

Binary Card Read-In 

Ferranti Input Routine 

FLIP III- a floating point subroutine system 

M, T. Routine for Convair Service Routines 
M. T, Routine for FLIP (revised) 
Activator (revised) 
Complex Arithmetic 
Inspect and Change (CV-12) 
Bioctal Paper lape (CV-81) 
Charactron Trace, Processer (CV-77) 
Magnetic Tape Storage * 

Differential Equations (GV-97) 
Card to Paper Tape (CV-94) 
Bessel Functions 
Charactron Output (CV-98) 
Card Output 
Card Input 

Alarm Routine (FLIP I) 
Arctangent and Arccotangent (FLIP I) 
Exponential (FLIP I) 
Input Sum Check (revised) 
Logarithm (FLIP I) 
Square Root (FLIP I) 
Loador (FLIP I) 
Loader Parameters (FLIP I) 
Basic FLIP (revised) 
Print and Punch (FLIP I) 
Flexowriter Input (FLIP I) 
Sine Cosine (FLIP I) 
Charactron Trace, Activator 
Charactron Trace, Concurrent 
Permanent Constants (FLIP I) 
Assembly Routine (FLIP) 
Trace (FLIP I) 
Alarm, Octal, and Flexprint (CV-115) viii 
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CV-52 Flexprint Subroutine 



ENCLOSURES 



ORp-118 Card Title Subroutine- a routine For Formating 

card output 

WS-119 Octal Card Read 

WS-120 Octal Card Dump 

WS-121 Ghecsk on High Speed Punch When Punching Biocta! Tapes 

CV-JL22 4 Point Lagrange Interpolation Subroutine 

CV-123 Determinant Evaluation Package-Real 



3:21 Notes on the timing of t3he Controlled Reproducer 
8:22 Formation of USE- a Cooperative Organization of 
1103 A Users 



1 



x 

PL, 



ix 



1105 Central Exchange 
Distribution List 



to 



X 



Byron D. Smith 

Remington Rand Unlvac 

Division of Sperry Rand Corporation 

1902 West Minnehaha Avenue 

St. Paul K, Minnesota 

(Midway 6-9601, Extension 512) 



Commanding General 

Unite Sands Proving Ground 

Hew Mexico 

Attention* Dr. JoM WSaffiatttt ~* 
Computing Branch 
Flight Determination 
laboratory 



National Security Agency 
Mrs. Dorothy T. Blum 
k%Lk North Pershing Drive 
Arlington 5> Virginia 



Director, National Security Agency 
Washington 25, D. C. 
Attention* 5512 



The Ramo-Wooldridge Corporation 

Mr. Werner Frank 

Computer Systems 

8820 BeHanca Avenue 

Los Angeles 45, California 



Mr. L. R. Turner 
2695 Westwood Road 
Westlake,0hio 



Mr. W. Bruce Taylor 
Johns Hopkins University 
Operations Research Office 
7100 Connecticut Avenue 
Chevy Chase, Maryland 



Commander 

Air Force Armament Center 

Attention! ACVMC 

Eglin Air Force Base, Florida 



Commander 

Wright Air Development Center 
Attentions WCRRU, Leonard B. Hall 
Wright-Patterson Air Force Base, Ohio 



Mr. Ben Ferber 

Digital Computing Laboratory 

Convair 

San Diego, California 



Mr. Donald B. Houghton , Chief 

Analysis Section 

Laboratories for Research and Development 

The Franklin Institute 

20th and Parkway 

Philadelphia 3, Pennsylvania 



Librarian, Numerical Analysis Research 

University of California 

1*05 Hilgard Avenue 

Los Angeles 2k-, California 



Mr. Albert E. Smith 
Code 225 
Bureau of Ships 
Navy Department 
Washington 25, D.C. 



Dr. Harry Polachek 

Head of Applied Mathematics Laboratories 

Code 800 

David Taylor Model Basin 

Washington 7, D.C. 



11.03 Central Exchange 
Distribution List 



Mr* Douglas T. Boss 
Massachusetts Institute of Technology 
Servomechanisms Laboratory 
Department of Electrical Engineering 
Cambridge 39* Massachusetts 



Mr* John M. Frankovich 
Digital Computer Laboratory 
Massachusetts Institute of Technology 
211 Massachusetts Avenue 
Cambridge 39; Massachusetts 



Mr* Robert Simon 

Electronic Computer Department 

19th Floor 

Remington Band 

Division of Sperry Rand Corporation 

315 Fourth Avenue 

New York City 10, New York 



Mr. W.R. Hydeman 
Suite 7 

1*218 Mayf ield Road 
Cleveland 21, Ohio 



Dr. George F. Cramer 

Electronic Computer Department 

19th Floor 

Remington Rand 

Division of Sperry Rand Corporation 

315 Fourth Avenue 

New York City 10, New York 



Mr. A.E. Roberts, Vice President 
General Kinetics, Incorporated 
555 23rd Street South 
Arlington 2, Virginia 



Dr. Grace M. Hopper 

Remington Rand 

Division of Sperry Rand Corporation 

1624 Locust Street 

Philadelphia 3, Pennsylvania 



Mr* William A. Gerhart 
120 Pear St. 
Reading, Pennsylvania 



Mr. Herbert Glantz 
5225 South Eighth St. 
Arlington k 9 Virginia 



Mr* Thomas T* Wilder 

Remington Rand 

Division of Sperry Rand Corporation 

^1 1st Street 

San Franeisco, California 



Mr. A*S. Baron 

Westinghouse Electric Corporation 

lto5 Parker Road 

Baltimore, Maryland 



x 



Mr* Erwin Tomash 

Electronic Computer Department 

19th Floor 

Remington Rand 

Division of Sperry Rand Corporation 

315 Fourth Avenue 

New York City 10, New York 



Mr. Randell E. Porter 
Boeing Airplane Company 
Seattle, Washington 



Mr. Karl E. BaJJL 
Sandia Corporation 
Sandia Base 
Albuquerque, New Mexico 



Mr. Theodore W. Helweg, ERA Engineer 
Johns Hopkins University - 0R0 
7300 Pearl Street 
Bethesda, Maryland 



3d 



1103 Central Exchange 



Mr. R. A. Cole 
Data Processing Group 
Pilotless Aircraft Division 
Boeing Airplane Company 
Seattle, Washington 



Mr. S.C. Marcus 

Emerson Electric Manufacturing Company 

HI Eighth Avenue 

New York City, New York 



Mr. Roy E. Hegler, ERA Engineer 
ERA Rem-Rand 1103 Computer 
Ramo-Wooldridge Corporation 
5740 Arbor Vitae 
Los Angeles 45, California 



Mr. John R. Pearson 
Holloman Air Force Base 
Telecomputing Corporation 
133 East Santa Anita Avenue 
Burbank, California 



Mr. J. Allen Ovenstone Mr. Ralph Stidham 

c/o Captain J.M. Armstrong, R.A.N* Holloman Air Force Base 

Defense Research and Development Representative Telecomputing Corporation 
Australian Joint Service Staff 133 East Santa Anita Avenue 

P.O. Box 4837 Burbank, California 

Washington 8, D.C. 



Mr. A.C. Hendrickson 

Remington Rand 

Division of Sperry Rand Corporation 

Electronic Computer Department - 19th Floor 

315 Fourth Avenue 

New York City 10, New York 



Mr. A. Christofferson, Jr* 

P.O. Box 2228 

San Diego, California 



Mr. James R. Vine 
Holloman Air Force Base 
Telecomputing Corporation 
133 East Santa Anita Avenue 
Burbank, California 



Mr. Allan R. Schoenfeld 
Holloman Air Force Base 
Telecomputing Corporation 
133 East Santa Anita Avenue 
Burbank, California 



to 
1 

o 
o 

ON 



x 

A, 



Mr. Kenneth R. Webster 
203 Fourth Avenue 
White Sands Proving Ground 
New Mexico 



Miss Ruth M. Davis 
David Taylor Model Basin 
Washington 1, D.C* 



Mr. Allan Keane 

Remington Rand 

Divsion of Sperry Rand Corporation 

Electronic Computer Department - 19th Floor 

315 Fourth Avenue 

New York City 10, New York 



Mr. Stanley Rintel 

Remington Rand 

Division of Sperry Rand Corporation 

Electronic Computer Departmnt - 19th Floor 

315 Fourth Avenue 

New York City 10, New York 



xii 



3103 Cenral Exchange 
Distribution List 



Miss Jean £• Sammet 

Sperry Gyroscope Company 

Division of Sperry Rand Corporation 

Mail Station R-210 

Great Neck, New York 



Mr. Robert H. Wallace 

Remington Rand 

Division of Sperry Rand Corporation 

M5 S. Main Ave. 

San Antonio 5, Texas 



National Security Agency 

Washington 25, D.C. 

Attention! Dr. R.A. Leibler (USA - $k) 



Mr. Harold Dahlbeck 

Electronic Computer Department 

19th Floor 

Remington Rand 

Division of Sperry Rand Corporation 

315 Fourth Avenue 

New York City 10, New York 



Director, Evans Signal Laboratory 

Belmar, New Jersey 

Attention* Director, Physical Sciences Divisio 

Mr. H. Stein 

Computer Techniques Section 



Mr. Robert G. Tantzen 

Technical Analysis Division 

HADC 

Holloman, New Mexico 



to 
ci 

* 



Mr. Edward L. Braun 

Coordinator 

MSD Computing Center 

Research Laboratories 

Lockheed Missile Systems Division 

Van Nuys, California 



Mr. John W. Young, Jr. 
1929 South Quebec Street 
Arlington k, Virginia 



Mr. Clem Grabner 

7100th Support Wing 

APO 633, Mew York, New York 



Mr. John Wooten 
Plant Number Two 
Boeing Airplane Company 
Wichita, Kansas 



Mr. Robert L. Young 

Director of Aero-Ballistics ACB 

AFAC, Eglin Air Force Base, Florida 



Mr. Theodore Dwight Buetell 
Douglas Aircraft Company 
3000 Ocean Park Blvd. 
Santa Monica, California 



Mr. Francis Newton Kurriss 
Douglas Aircraft Company 
3000 Ocean Park Blvd. 
Santa Monica, California 



Commanding General 
Holloman Air Development Center 
Holloman Air Force Base, New Mexico 
Attention! M.C. Green HDTT 



xiii 



110.3 Central Exchange 
Distribution List 



Mr. Thomas Duke 
Telecomputing Corporation 
128385 Saficoy Room 371 
North Hollywood, California 



Dr. Werner Leutert 
Systems Division 
Lockheed Missiles 
Van Nuys, California 



Mr. A. Downing 
AVRO Aircraft 
Toronto, Canada 



Attention: R. P. Blixt 

Remington Rand Univac 

Division of Sperry Rand Corporation 

Box 1206 

Melborne, Florida 



Dr. Clair Miller 

California Research Corporation 

576 Standard Ave* 

Richmond, California 



Flight Simulation Branch 
Electromechanical Laboratories 
White Sands Proving Grounds 
New Mexico 
Attention: Mr, Haryy Davis 



Jack Rose 

Remington Rand 

Division of Sperry Rand Corporation 

2601 Wilshire Blvd. 

Los Angeles, California 

Mr, Jim Murray 

^Wington Rand 

Division of Sperry Rand Corporation 

1615 ""L" Street 

Waning ton 6, D.C 



Mr, T. B. Andrews 

National Advisory Committee for Aeronautics 

Lengley Field, Virginia 



Mr. Thomas R. Dines 
22803 65th Place W. 
Mount Lake Terrace 
Washington 



Theodore S. Garfinkle 
The Johns Hopkins University 
Operations Research Office 
7100 Connecticut Ave. 
Chevy Chase, Maryland 



Miss Aria E t Weinert 
905 Fairvies Ave. Apt, #3 
Washington 12,D.C* 



Dr. Ben Mount 
AEC Westinghouse 
Pittsburg, Pennsylvania 



Mr. Morgan Walker 

DuPont Engineering Department 

Wilmington 98, Delaware 



to 
i 






Mr. Jack Burke 
Remington Rand Division of 
Sperry Rand Corporation 
Ferry at 4-th Ave. 
Pittsburg 22, Pennsylvania 



Cornell Aeronautical Laboratory INC, 

Buffalo, New York 

Attention: Dr. F* Rosenblatt 



Cornell Aeronautical Laboratory Inc. 
Buffalo itew York 
Attentions Mr. G. Richmond 



xiv 



pn::',':\ni:a oy 

CWlXKcD LY 
REVISED QY 



R. M. Price 



CV-109 
C O N V A I R 



SAN DIEGO 



Page 1 of 1 

page ST 001*1 

REPORT NO. Z.M U91 
MODEL All 

DATE, 12/12/55 



MOCK VIII 

Th© MOCK VIII is a magnetic tape corrector routine designed to 
facilitate changes in the increasing number of programs stored on magnetic 
taps • 

Changes are read from punched cards and have the following formats t 



TGRVikT I 
Col. 1 


OLD WORD 

h 7 13 

CC UuTTOir vww 


BLOCK WORD 
20 25 
BBBB.* mi 


new WORD 

29 32 56 
CC UUUTJU VWW 


FORMAT II 
Col* 1 
F 


OLD WORD 

h 9 3JU 

CCCC XXXX YYYY 


BLOCK WORD 
20 25 
BBBB m 


NEW WORD 

29 % 39 
CCCC XXXX TYYY 



Format II is simply a reading and key-punching convenience (it Is noted 
by an ..'JF in column one), any command including flip oommands may be punched 
unfter 'FORMAT I (column one blank)* 

>- l i*I:t> first card must have the 1ST number punched in column one (it does 
not he.ve any thing else punched in it) and it is followed by any number of 
change cards whose block numbers are in ascending sequence* A blank card 
signals the end of the changes • 

The blocks of the magnetic tape are considered as being numbered from 
0000 thru 3777 and the words of each block from 00 thru 37, The tape 
should be rewound when starting* BBBJ5 and Vft7 are octal numbers* 

If the old word is not -known pimply leave that part of the card blank* 

OPERATING INSTRUCTION 

t 1. LOAD SROS LOAD CHANGE CARDS WITH TAPS INDICATOR CARD IN. FRONT, 
(no prima) 

2. MD START PAK 70377. 

3« ERROR STOPS. 

1. *mj>* will print and the machine will stop with Q containing 

the old word from the tape, the block number in u of R, 
and the word number in v of R f when the old word on the 
tape is not the indicated ©ne# 

2. "BLK* will print if the block number is out of sequence 

and the bloek and word numbers will appear in R as above. 

IN EITHER CASE PRESS STAET. TO IGNORE THIS CHANGS AND CONTINUE TO 
THE NEXT ONE. ' , ' ^ 

Drum Allocation 701llv - 70$77* This routine is not in standard form 
and is not to be siiodifiod. All constants and temporaries are included in the 
routine. It dooa not save or restore ES. 
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MOCK 


VII3 


[ ST 001 




70114 


00000 


45 


00000 00001 




70115 


00001 


17 


00000 00106 


PICK 1ST CARD 


70116 


00002 


37 


00205 00121 


READ 1ST CARD 


70117 


00003 


55 


00334 00036 


MT# — > GU 00334 


70120 


00004 


11 


00117 10000 


MASK —* Q 


70121 


00005 


53 


00334 00043 


SET WRITE 


70122 


00006 


53 


00334 00050 


SET ADVANCE 


70123 


00007 


53 


00334 00051 


SET READ 


70124 


00010 


53 


00334 00052 


SET BACK 


70125 


ooon 


• 53 


00334 00102 


SET WRITE FINAL 


70126 


00012 


53 


00334 00106 


SET REWIND 


70127 


00013 


.23 


00320 00320 


ZERO TO CURRENT BLK.N0. 


70130 


00014 


16 


00244 00042 


SET 5A 


70131 


00015 


16 


00052 00111 


SET 9A 


70132 


00016 


23 


00321 00321 


CLEAR TALLY 


70133 


00017 


37 


00017 00020 




70134 


00020 


16 


00245 00023 


SET PARAM» STORE 


70135 


00021 


37 


00205 00121 


READ ONE CARD 


70136 


00022 


75 


30003 00024 


STORE. 


70137 


00023 


11 


00330 30400 


DATA 


70140 


00024 


11 


00333 20000 




70141 


00025 


47 


00026 00291 


.-BLANK CARD ? 
+ N0» UP STORE 


70142 


00026 


21 


00023 00246 


70143 


00027 


n 


00321 00236 


UP TALLY 


70144 


00030 


42 


00245 00021 


1 — TALLY FULL? 
Y%S» TALLY^l — + TALLY 


70145 


00031 


23 


00321 00236 


70146 


00032 


15 


00244 00034 


SET STORE Ft 


70147 


00033 


75 


30003 00035 


-ystore 


70150 


00034 


11 


30400 00330 


70151 


00035 


11 


00226 10000 


MASK — » Q 


70152 


00036 


51 


00330 00322 


00 OBBBB 00000— ^TEMP, A 


70153 


00037 


43 


00226 00102 
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CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO CALIFORNIA 

OV-109 



page ST001-3 

REPORT 2M i+91 

MODEL All 

DATE 12-12-55 





MOCK 


vm 


[ ST 001 




70154 


00040 


42 


00320 


00115 


C*B#N« > BBB8? YES— * ALARM 


70155 


00041 


43 


00320 


oono 


C.B#fU =BBBB—*YE$ 


70156 


00042 


37 


00042 


00044 


70157 


00043 


65 


00001 


00340 


WRITE PREVIOUS BLOCK 


70160 


00044 


23 


20000 


00320 


SET 


70161 


00045 


23 


20000 


00236 


ADVANCE 


70162 


00046 


n 


00226 


10000 


TAPE 


70163 


00047 


53 


20000 


00050 


ORDER 


70164 


00050 


66 


00000 


00043 


ADVANCE MT 


70165 


00051 


64 


00001 


00340 


READ MT 


70166 


00052 


67 


00001 


00113 


BACK MT 


70167 


00053 


11 


00322 


00320 


BLOCK NO.— >C«B«N» 


70170 


00054 


11 


00254 


20000 


SET 


70171 


00055 


11 


00230 


10000 


TRANSFER OF 


70172 


00056 


52 


00330 


00075 


NEW WORD TO OLD 


70173 


00057 


55 


20000 


00017 


SET "OLD WORD 


70174 


00060 


15 


10000 


00063 


TO A" TRANSFER 


70175 


00061 


11 


00330 


10000 


SKIP 


70176 


00062 


44 


00075 


00063 


r-C0MPARI$0N? 
NO# OLD WORD TO A 


70177 


00063 


11 


30060 


20000 


70200 


00064 


4* 


00331 


00075 


OLD WORD CORRECT? 


70201 


00065 


11 


20000 


10000 


N0 t 


70202 


00066 


31 


00255 


00052 


ERROR 


70203 


00067 


37 


00074 


00072 


PRINT 


70204 


00070 


11 


00330 


20000 


AND 


70205 


00071 


56 


00000 


00076 


HALT 


70206 


00072 


61 


00000 


20000 


FLEX 


70207 


00073 


34 


20000 


00006 


PRINT 


70210 


00074 


47 


00072 


30074 


ROUTINE 


70211 


00075 


11 


00332 


30056 


NEW WORD TO OLD WORD 


70212 


00076 


37 


00076 


00077 




70213 


00077 


21 


00034 


00247 
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FORM NO E. T. ■ 1 Ofi r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN OIF.GO. CALIFORNIA 



By i R. U, Price 



'J7-IC9 



PAGE STOOl-ii. 

REPORT 2M ^ 91 
MODEL AU 

12-12-5J5 



DATE 



MOCK VHI 



ST 001 



o 
o 

ti 
I 

o 
u 



p4 



70214 
70215 
70216 
70217 
70220 
70£2i 
70222 
70223 
70224 
70223 
70226 
70227 
70230 
70231 
70232 
70233 
70234 
70235 
70236 
70237 
70240 
70241 
70242 
70243 
70244 
70245 
70246 
70247 
70250 
70251 
70252 
70253 



00100 
00101 
00102 
00103 
OO1O4 
OO1O5 
00106 
00107 

oono 
oom 

00112 
00113 
00114 
00115 
00116 
00117 
00120 
00121 
00122 
00123 
00124 
00125 
00126 
00127 
00130 
00131 
0JD132 
00133 
00134 
00135 
00136 
00137 



41 00321 
45 00000 
65 00001 
11 00226 
53 00320 
21 00106 
67 00000 
57 00000 
47 00053 
37 00111 
45 00000 

16 00050 
45 00000 
31 00256 
45 00000 
00 70000 
00 00000 

17 00000 

75 30005 
23 00333 
11 00232 
37 00135 
37 00135 

76 00000 
76 10000 
76 10000 
35 10000 
44 00240 
21 00333 
37 00135 
11 00233 
11 00234 



00033 
00016 
00340 
10000 
00106 
00237 
00114 
00000 

00111 

70154 

00053 

00042 

00051 

00052 

00067 

00000 

00 * 

00231 

00124 

00333 

00325 

00127 

00127 

00327 

10000 

00326 

00003 

00241 

10000 

00136 

00146 

00327 



USED ALL PARAMS* J-jfrN0 
YES READ NEXT SET 
WRITE FINAL BLOCK 
SET 

CURRENT BLK» NO* + 1 
TO REWIND ORDER 
REWIND MT 
FINAL STOP 

(BL0CK# EQUALS C.B»N.) DOES BLK# r C 
YES ToY SWITCH 




(9Af SET- WRITEt SET 9B 
JUMP TO READ 
ALARM* BLK* N0« 
OUT OF SEQUENCE 



PICK READ CARD AnD READ 
CLEAR 

TEMP. STG» 

READ ROW 9 
READ ROW 8 
READ 
ONE 
ROW 
TEST FOR 
BIT IN 

COLUMN FOUR 



SET INDEX FOR "ONE FIELD 1 
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CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DiraO. CALIFORNIA 



By i R» U. Prieo 



J^-'IC- 



PAGE ST001-5 

REPORT ZU U91 

MODEL All 

DATE 12-12-55 



MOCK VIII ST 001 



o 

H 
i 

to 
I 

o 
o 

ON 

H 

E> 

P* 



70254 


00140 


31 


00227 


00014 


SET SENTINEL • 




70255 


00141 


32 


20000 


00002 


SHIFT LEFT; A^3> A u <a) 




70256 


00142 


44 


00143 


00144 


r — BIT IN THIS COL*?-, 
y|s; A^ -f ROW NO. | 




70257 


00143 


32 


00325 


00000 




70260 


00144 


46 


00145 


00141 


SENTINEL? i 




70261 


00145 


31 


20000 


00000 


YES REMOVE SENTINEL 




70262 


00146 


35 


30136 


30320 


Tj -t A ? — >T 




70263 


00147 


21 


00146 


00235 






70264 


00150 


41 


00327 


00140 


FINISHED ONE FIELD? 
YES 




70265 


00151 


37 


00151 


00152 




70266 


00152 


55 


00326 


00000 


F — > Q 




70267 


00153 


37 


00151 


00140 


SET JUMP 




70270 


00154 


41 


00325 


00127 


READ ALL ROWS? (THRU ROW 


0) 


70271 


00155 


37 


00135 


00127 


YES: READ ROW 11 




70272 


00156 


12 


00334 


20000 






70273 


00157 


42 


00121 


00206 


FLIP OR NORMAL? 




70274 


00160 


55 


00334 


10011 


FLIP* EXTRACT 




70275 


00161 


51 


00223 


20000 


OLD 




70276 


00162 


55 


10000 


00003 


WORD . 




70277 


00163 


52 


00224 


20000 


FROM 




70300 


00164 


55 


00335 


10017 


CARD . 




70301 


00165 


52 


00225 


00331 


IMAGE 




70302 


00166 


35 


00336 


10014 


EXTRACT 




70303 


00167 


51 


00223 


20000 


NEW 




70304 


00170 


55 


10000 


00003 


WORD 




70305 


00171 


52 


00250 


20000 


FROM 




70306 


00172 


55 


00337 


10017 


CARD 




70307 


00173 


52 


00243 


20000 


IMAGE 




70310 


00174 


55 


10000 


00003 






70311 


00175 


52 


00225 


00332 






70312 


00176 


55 


00335 


10014 






70313 


001^7 


51 


00226 


20000 


SET "BBBB U 
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REPORT 211 U91 

MODEL A ll 

DATE 12-12-55 



o 

o 

r~\ 
txl 

I 

O 
O 
O 
H 
l> 





MOCK 


VIII 


[ ST 001 




70314 


00200 


55 


00336 10006 




70315 


00201 


52 


00230 00330 


set'W* 


70316 


00202 


37 


00135 00127 


READ ROW 12 


70317 


00203 


37 


00203 00204 




70320 


00204 


21 


00330 00227 


SET NO 'OLD W0RD U INDICA 


70321 


00205 


45 


00000 30000 


EXIT 


70322 


00206 


55 


00334 10011 


NORMAL* EXTRACT 


70323 


00207 


51 


00227 00331 


OLD 


70324 


00210 


55 


10000 00003 


WORD 


70325 


00211 


15 


10000 00331 


FROM 


70326 


00212 


55 


00335 10017 


CARD 


?0327 


00213 


16 


10000 00331 


IMAGE 


70330 


00214 


55 


00336 10014 


EXTRACT 


70331 


00215 


51 


00227 00332 


NEW 


70332 


00216 


55 


10000 00003 


WORD 


70333 


00217 


15 


10000 00332 


FROM 


70334 


00220 


55 


00337 10022 


CARD 


70335 


00221 


16 


10000 00332 


IMAGE 


70336 


00222 


45 


00000 00176 




70337 


00223 


77 


77000 00000 


CONSTANTS 


70340 


00224 


00 


0Q777 70000 




70341 


00225 


00 


00000 07777 




70342 


00226 


00 


07777 00000 




70343 


00227 


77 


00000 00000 




70344 


00230 


00 


00000 00077 




70345 


00231 


00 


00000 00105 




70346 


00232 


00 


00000 00*07 




70347 


00233 


35 


00334 00334 




70350 


00234 


00 


00000 00002 




70351 


00235 


00 


00001 00001 




70352 


00236 


00 


00000 00001 




70353 


0Q237 


00 


00001 00000 
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MODEL m\ 

DATE 12-12-55 



o 

O 

r-( 

I 
tj 

I 
O 

o 
o 

r-l 





MOCK 


VII] 


[ SI 


r 001 




70354 


00240 


16 


00205 


00203 




70355 


00241 


55 


10000 


00040 




70356 


00242 


45 


00000 


00134 




70357 


00243 


00 


00000 


70000 




70360 


00244 


00 


00400 


00044 




70361 


00245 


00 


00000 


00400 




70362 


00246 


00 


00000 


00003 




70363 


00247 


00 


00003 


00000 




70364 


00250 


00 


00777 


00000 




70365 


00251 


16 


00023 


00252 


BUNK CAROt SET 


70366 


00252 


11 


00226 


30251 


SENTINEL 


70367 


00253 


45 


00000 


00032 




70370 


00254 


11 


00332 


00340 




70371 


00255 


45 


47311 


22257 


FLEX CODE FOR *WR| 


70372 


00256 


45 


47231 


13657 


FLEX CODE FOR *BLI 


70373 




00 


00# 




BLANK 


70374 




00 


00* 




vuULo 


70375 




75 


30257 


00001 


PROGRAM. 


70376 




11 


70114 


00000 


TRANSFER TO E$ 


70377 




45 


00000 


70375 


ENTRY TO ROUTINE 
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15 December 1955 



OPERATIONS RESEARCH OFFICE 
Chevy Chase, Md. 



Title: 
Format: 

Storage: 

a) Total: 

b) Instructions: 

c) Constants: 

d) Constant Pool: 

e) Temporary Pool; 

Alarm Conditions: 

a) Alarm 1: 

b) Alarm 2: 



Coded & Machine Checked By: 



Magnetic Tape Block Counter Routine 
Standard Form 



01000 - 01077, 
01000 - 01063, 
01064 - 01077, 
40, 41, 73, 74 
11, 12 



100 octal 
64 octal 
14 octal 



The operation part of the MT order 
does not equal 64, 65, 66, or 67. 
The j part of the MT order does not 
equal 0, 1, 2, or 3, 

W. Bruce Taylor 



Description: 

The block counter routine automatically keeps track of the position 
of the reading head of each of the magnetic tape units, provided a return 
jump to the block counter routine, - namely 37 01001 01002, - is written 
after each magnetic tape order. 

The cumulative number of blocks which the reading head has advanced 
is stored in the registers whose addresses are ja, a+l r a+2, and a+3, for 
the Oth, 1st, 2nd, and 3rd tape unit, respectively. Thus (a) is the block 
count of the Oth tape unit, where the concept of "block count" is further 
discussed in the following. 

The addresses ja thru a+3 are selected, and (a) thru (a+3) are set 
equal to zero by the following sequence of orders: 



Order 



C& 








6 


MT 


j « 


v 


o 








o 








1— 1 


37 


01001 


01002 


X 








a. 


00 


a 


00000 



(Fig. 1. See next page) 



Function of Order 

One of the four magnetic 

tape orders. 

Return jump to block counter 

routine. 

Parameter word for selection 

and clearing of counters. 

Next order executed after 

block counter routine. 
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on- no 
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Fig. 1. Sequence of orders which first selects ^ thru a+3 as the addresses 
of the registers in which the block counts will be stored, then clears 
these registers, then sets (a+j) = n.2l5 # 

The block counter routine selects and clears the counters by first 
testing whether the two left-most octal digits of the word immediately 
following the return jump are both equal to zero. If so, the selection 
and clearing takes place. However, selection and clearing does not take 
place otherwise, and in this latter case the order executed after the block 
counter routine is the order following (in address sequence) the return 
jump order. This use of the block counter routine is as follows: 

Order Function of Order 

MT j n v One of the four 

magnetic tape orders, 

37 01001 01002 Return jump to block 

counter routine. 

----- — - - Next order executed 

after block counter 
routine. 

Fig. 2. Sequence of orders which increases or decreases (a+j) by n.2***, 
depending upon whether the order MTjnv advances or backs tape unit j. 

The block counter routine is meant to be used first as in Fig. 1, and 
then for subsequent uses as in Fig. 2. Thus the counter addresses are 
chosen at their first usage, and retained thereafter. 

Usually, a zero setting of the counters will correspond to a manual 
setting of the magnetic tape units each to the beginning of their first 
block. But this is not necessary, since the block counter routine can 
accumulate negative values of n if it is called for by the program which 
uses the routine. Thus a MT unit could be positioned in the middle of its 
reel so that forward positions from its starting position would be recorded 
as positive values, while backward positions would be recorded as negative 
values. 

This routine has been found useful in a program in which the n value 
of the MT orders is a function of the prior course of the program. 
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Block Counter Routine 



i 

CO 

6 

o 
o 



X 

a, 



Storage 
Address 




Orde 


r 


01000 


37 


76000 


76002 


01001 


45 


00000 


30000 


01002 


23 


00011 


00011 


01003 


16 


01001 


00011 


01004 


55 


00011 


00017 


01Q05 


15 


00011 


01007 


01006 


55 


00011 


00025 


01007 


11 


[30000] 


00012 


01010 


11 


01064 


10000 


01011 


51 


00012 


20000 


01012 


43 


00040 


01055 


01013 


23 


00011 


00041 


01014 


55 


00011 


00017 


01015 


15 


00011 


01016 


01016 


11 


[300001 


00011 


01017 


11 


01064 


10000 


01020 


51 


00011 


20000 


01021 


11 


20000 


20000 


01022 


43 


01065 


01030 


01023 


43 


01066 


01032 


01024 


43 


01067 


01032 


01025 


43 


01070 


01032 


01026 


11 


00074 


20000 


01027 


45 


00000 


01000 



Function of Order 

Alarm exit 

Normal exit 

Clear (11) 

y+2-Mll), where (y) = MTjnv. 

[>2].2 15 ->(11). 

y+2->u (1007) 

y+2->(ll) 

(y+2)— >(12); written by (1005) 

op extractor to (Q) 

0->(L); op(y+2)-2 30 ->(R) 

If (A) = 0, jump to extract a., where a, = 
address of block count of Oth tape unit. 
y-^(ll) 

y-2 15 ->(ll) 

y->u(1016) 

MTjnv— >(11); written by (1015) 

op extractor to (Q) . 

0->(L); op(y)-2 30 ->(R) 

op(y).230->(A) 



op(y) = BM ? 

op(y) = AM ? 

op(y) = WM ? 

op(y) = RM ? 

1->(A) 

1-alarm, no MT order detected. 



Yes, to 1030 

Yes, to 1032 

Yes, to 1032. 

Yes, to 1032 
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i 

CO 



o 






Storage 
Address 

01030 

01031 

01032 

01033 

01034 

01035 

01036 

01037 

01040 

01041 

01042 

01043 

01044 

01045 

01046 

01047 

01050 

01051 

01052 

01053 

01054 



Order 

11 01071 

45 00000 

11 01072 

11 01073 

51 00011 

43 00040 

21 01053 

51 00011 

43 01074 

21 01053 

51 00011 

43 01075 

21 01053 

51 00011 

43 01076 

11 00041 

45 00000 

11 01077 

51 00011 

[OO 30000 



01053 
01033 
01053 
10000 
20000 
01051 
00073 
20000 
01051 
00073 
20000 
01051 
00073 
20000 
01051 
20000 
01000 
10000 
00012 
30000] 



45 00000 01001 



Page 4 of 5 
Function of Order 

Prepare to decrease block-count. 

Jump over increase-case. 

Prepare to increase block-count 

Put j extractor in (Q) . 

j(y).227-»( A ). 

j = ? Yes, to 1051. No, continue. 

a+l-^u(1053). 
j(y).227-^( A ), 

j = 1 ? Yes, to 1051. No, continue. 

a+2-»u(lQ53), 

j(y).227-*(A). 

j = 2 ? Yes, to 1051. No, continue. 

a+3->u(1053). 

j(y)v2 27 -^(A). 

j ~ 3 ? Yes, to 1051. No, continue. 

2— >(A) . 

2-alarm, no proper j-value detected. 

Put n-extractor in (Q) , 

n(y) .2l5-->(12). 

Modify block-count; written by 1030, 
1032, 1036, 1041, 1044. 
Jump to normal exit. 



01055 15 00012 01071 Set u(l071) = a 

01056 15 00012 01072 Set u(1072) = a 

01057 55 00012 00025 a-»(12). 
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CO 



o 
o 



X! 
0. 
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Storage 
Address 




Order 


Function of Order 


01060 


16 


00012 


01063 


a->v(1063). 


01061 


21 


01001 


00074 


Reset exit to skip (y+2) . 


01062 


75 


10004 


01013 


f Clear (a) , (a+1) , (a+2) t & (a+3) & return 


01063 


11 


00040 


[3OO06] 


Lto continue MT block-count routine. 


01064 


77 


00000 


L_ J ' 
00000 


op extractor. 


01065 


67 


00000 


00000 


op (BMjn-). 


01066 


66 


00000 


00000 


op (AMjn-). 


01067 


65 


00000 


00000 


op (WMj nv) . 


01070 


64 


00000 


00000 


op (RMj nv) , 


01071 


23 


[30000] 


00012 


Order which decreases block-count. 


01072 


21 


[300001 


00012 


Order which increases block-count. 


01073 


00 


70000 


00000 


j extractor. 


01074 


00 


10000 


00000 


1-2 27 . 


01075 


00 


20000 


00000 


2.227. 


01076 


00 


30000 


00000 


3.2 27 . 


01077 


00 


07777 


00000 


n extractor. 
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Identification Tag: 

Types 

Assembly Routine Spec: 

Storage : 



THE RAKO-WOOLDRIDGE CORPORATION 
Los Angeles lj.5, California 

Fixed Point Definite Integral Evaluation 

Specifications 

DIE-1 

Subroutine 

SUB 51236 03506 

29 instructions, addresses 
LOO thru L28 

6 constants in program, addresses 
C01 thru C06 

35 words total program storage, addresses 
LOO thru L28 
C01 thru C05 

5 words temporary storage pool used, 
addresses 00027b thru 00033b 

The constant pool is used by this routine. 



Program Entrances: 
Program Exit: 
Alarm Exit: 



Addresses L02, L03, L0i|. 

Address L01 

The alarm exit is not used by this routine* 



Drum Assignment: 



Addresses 657M*b thru 66006b 



Machine Time: 



(U.!k32 + *032n) millilJeconds for Entrance #1 
(U.18U + •032h) % '»'' for Entrance #2 
(li.lil6 + .032n) " for Entrance #3 



Mode of Operation: 



Fixed point 



Coded by: 
Code Checked by: 
Machine Checked by: 
Approved by: 



C. Miller 
C. Miller 
C. Miller 
W. F. Bauer 



November, "1955 
November, 1955 
November, 1955 
November 25, 1955 
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Description 

This routine computes an approximation to the integral mean 



DIE-1 

Pg. 2 of 6 



A 



(x n " V J 



ydt 



x 
o 



for given tabular data y. = y(x. ) > (i = 0, ,,.,n) stored at consecutive cells 
and scaled at 2 . The arguments are equally spaced and given by 

x i = x o + "^ (i = 0, *.,,n) 

g 

The routine requires the address where y *2 is stored and either the address 

of y *2 S or the value of n. The result is left in both A and Q at the end of 

the routine and scaled by the same factor as were the y's. The routine does not 

need to have cognizance of this scaling. 

The difference between the routine DIE-0 and this routine is that the error terms 

are of fourth and fifth order respectively. 

Programming Instructions 

Three entrances are available depending on which combinations of the parameters 

s 
are given. We define a. as the address where y. *2 is stored* See below 

for limitations on the parameters, 

1, Entrance #1 

a. Place a in Q and n (scaled at 2 ) in A. 

^ b. Execute RJ 00L01 00L02 if the subroutine begins at cell 00L00. 

co c. Control is returned to the word following the RJ instruction* 

o 

o 2. Entrance #2 

r-i 

>< a. Place in A the double extension of the parameter word 

oo uuuuu vww 

where uuuuu = a and vww = a 
o n 

b. Execute RJ 00L01 00L03 if the subroutine begins at cell 00L00, 

c. Control is returned to the word following the RJ instruction, 

8-8 
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3. Entrance #3 
a. Enter with 

RJ 00L01 OOLOU 
00 uuuuu vww 
assuming that the subroutine begins at cell 00L00 and where 
uuuuu * a Q and vww «■ a . 
b„ Control is returned to the cell following the parameter word* 
For all three cases the calculation is identical, with the result (scaled 2 s ) 
left in £ and Q upon exit from the subroutine. 
Range of Parameters 

The routine requires that 8 4=. n ^ 1*095 and that a and a both be ES 
addresses or both be MD addresses. A check is not made which would enforce 
these requirements. For n too small, an incorrect computation will be 
produced. For inadmissible addresses (a and a ), n too large or operation co$e 
non zero in the parameter word, the routine will either phpaftttae an incorrect 
answer or halt on an overflow fault or an SCO fault. 
Execution TIjpb 

Assuming the data to be in ES, the execution times are, in milliseconds: 
l*.lk32 + .032n (Entrance #1) 

U.18U + .032n (Entrance #2) 

li,l+l6 + <>032n (Entrance #3) 

If, however, the data are in MD one must add to these figures the time for 
five and a fraction drum revolutions assuming a k interlace. This is an amount 
of time varying from 170 to 20U milliseconds. 
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Mathematical Analysis 

According to techniques of Hilne"'% quadrature formulas were derived as follows: 



y dx = 



W 



9 y + 19 y x - 5 y 2 + y 3 



7^ ^ ^ 



(i) 



i 

CO 



o 
o^ 



X 

a, 



and the dual 



x 



n 



y dx 



= -5T L 



9 ^ '* 19 y n-l - * rn-2 + yn-3 ] ~ 7^" ^ ^ 



X 



n-1 



These expressions were substituted in the following identity for the integration 
over the intervals x , x.^ and x ,x , 



x 



n 



1 



x., 



r 



J 

x 
L_ o 



x 2 /3 



x x, 
o 1 



/- 1+2 ..n-1 ~ n r n 

2/ */ */ i 

i«2 i-2 n-3 n-2 n-1 



i-2 n-3 _ 

In the remaining integrals use was made of Milne's formula (ii), page 123 for the 

integration over the interval x j_p > x i+? 1 while Simpson's rule was employed 

for integration over the remaining integrals, This gave rise to the quadrature 

formula 

hi ^ 

y dx » h / ^ ± J± '% e 



x. 



i=0 



with 



L 



n-i 



- 13A8 + 7/90 - *3U86 111111 

* 39A8 + 39/90 - 1.2 1£8 333333 

- 15/1*8 + 51/90 - .8791666667 

* 5/1*8 + 83/90 - 1.0263 888889 

c 1 1; ^ i ^ n-1* 



#, 



a') 



(2) 



(3) 



Kilne, W. E., Numerical Calculus , Frinceton University Press, Princeton, New Jersey, 
191*9, Chapter IV. 8-10 



I 

CO 

I 

o 
o 

o 



X 
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E is the error term 



E - -^ yM h^ + (n-U) C^) y (6) h? 



E - -V yM L* + (2±) (-L-) y< 6 ) L? 

where L = hh ■= x - x is the length of the interval of integration. 
Dividing formula (3)byL»nh=x - x gives the approximation to the 



integral mean: 



iO 



The routine calculates 



M«2 S - 



h Z, *± y± 

iO 



Error Analysis 

The truncation error in the quadrature formula used is as indicated in the 

analysis above. The total round-off error in the routine's calculation of 

¥l*2 does not exceed 1 + U/n. 

That is, 



(A) f - K«2 £ 



^— 1 + h/n. 
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D 




R W C 00 


OOOOO 




RW CONSTANTS 




00 


OOOOO 


OOOOO 


D 




R W T 00 


000 2 3 




RN TEMPS 


27 


00 


OOOOO 


OOOOO 







00 L 00 


10 24 






200 


00 


OOOOO 


OOOOO 


n 




00 C 00 


10 52 






20 3 4 


00 


OOOOO 


OOOOO 







OSLOO 


5 12 3 6 






6 574 4 


00 


OOOOO 


OOOOO 


D 




S C 00 


5 1264 






6 600 


00 


OOOOO 


OOOOO 


SL 


D V 


RW T 00 


AOOOO 




ANS TO Q ACC 


6 574 4 


73 


00027 


20000 


SL0 1' 


M J 


00 000 


AOOOO 




EXIT 


6 574 5 


4 5 


OOOOO 


20000 


SL 2 


MA 


ooooo 


RWC17 




EN T NO 1 


6 57 46 


72 


10000 


00021 


SL 3 


M J 


00 000 


OOL 07 




EN T NO 2 


6 5747 


45 


ooooo 


2 007 


SL 4 


T V 


00 LO 1 


OOL 06 




EN T NO 3 


6 5750 


16 


02001 


2 006 


S L 5 


R A 


00 L01 


R W C 1 6 




SET UP EXIT 


6 5751 


21 


02001 


0020 


S L 6 


MP 


RWC16 


OOOOO 




PAR TO ACC 


6 57 52 


71 


00020 


OOOOO 


S L 07 


T U 


AOOOO 


OOL 28 






6 5753 


15 


20000 


2 34 


SL 08 


T P 


A 000 


RWTOO 




PAR TO RWTOO 


6 5754 


11 


20000 


0027 


S L 09 


L Q 


RN TOO 


100 15 






6 5755 


55 


000 27 


10017 


SL 1 


T U 


ooooo 


OOL 1 9 




STASH ADD YN 


6 5756 


15 


1 0000 


2 023 


SL 1 1 


L Q 


ooooo 


00006 






6 57 57 


55 


10 


006 


SL 1 2 


T V 


ooooo 


RWTOO 






6 5760 


1 6 


10000 


0027 


SL 1 3 


T V 


ooooo 


OOL 25 




STASH ADD YO 


6 57 61 


16 


10000 


2 31 


SL 1 4 


S T 


RUTOO 


RWTOO 




N TO RWTOO 


6 5762 


36 


000 27 


00027 


SL 1 5 


S A 


00 L 28 


000 15 




SET UP 


6 576 3 


32 


2 3 4 


0017 


SL 1 6 


T U 


AOOOO 


OOL 27 




RP COUNT 


6 5 764 


1 5 


20000 


2 33 


SL 1 7 


R S 


00 L 1 9 


OOC 01 




BLOCK TRF 


6 576 5 


23 


020 23 


2 35 


SL 1 8 


RP 


3000 4 


OOL 20 




Y N MINUS 3 


6 576 6 


75 


30004 


2 24 


S L 1 9 


T P 


ooooo 


R W T 1 




TO R W T 01 


6 576 7 


11 


OOOOO 


000 30 


S L 20 


MP 


00 C 2 


R W T 04 






6 57 70 


71 


020 36 


3 3 


SL 2 1 


MA 


00 C 4 


R W T 3 ' 






6 5771 


72 


02040 


32 


S L 2 2 


MA 


00 C 5 


R W T 02 






6 57 72 


72 


02041 


0031 


SL 2 3 


MA 


00 CO 6 


R ft T 1 






6 57 73 


72 


020 42 


00 30 


S L 24 


R P 


30 00 4 


OOL 26 






6 57 74 


75 


3 0004 


2 32 


S L 2 5 


MA 


00 C 3 


ooooo 






6 5775 


72 


020 37 


OOOOO 


S L 26 


T P 


B 000 


AOOOO 






6 5776 


11 


30000 


2 000 


S L 27 


RP 


OOOOO 


OOL 00 






6 5777 


75 


000 00 


2 000 


S L 28 


A T 


OOOOO 


AOOOO 






6 6000 


35 


OOOOO 


2000 


SC 1 





OOOO 3 


OOOOO 






6 6 001 


00 


00003 


OOOOO 


S C 2 


3 


48611 


1111 1-0 1 


3 5 


DO PLUS 1 


6 600 2 


13 


117 51 


17512 


SC03- 


6 


5 1388 


B 888 9 — 1 


3 5 


DO 


6 6 003 


53 


117 51 


17511 


S C 4 


2 


4 5833 


333 33-0 1 


3 5 


Dl 


6 6 004 


07 


6 7356 


7 3567 


S CO 5- 


1 


208 3 3 


3 3 3 3 3-0 1 


3 5 


D2 


6 600 5 


74 


104 21 


4 2 10 


S C 6 


2 


6 388 8 


8 8889-0 2 


3 5 


D3 


6 6006 


00 


6 60 26 


60266 



8-12 



MY- 112 



DIE-2 

Pg. 1 of k 



Identification Tag: 

Type: 

Assembly Routine Spec: 

Storage : 



THE RMO-WOOLDRJDGE CORPORATION 
Los Angeles h£ t California 

Floating Point Definite Integral Evaluation 

ope c zlx *Lca~ojLons 

DIE-2 

Subroutine 

SUB 51271 0U50l| 



Program Entrances: 
Program Exit: 
Alarm Exit: 



Ip. instructions, addresses 
LOO thru L01 
H00 thru H38 

J4. constants in program, addresses 
LOO thru L03 

U5 words total program storage, addresses 
LOO thru L01 
H00 thru H38 
COO thru C03 

1 word temporary storage pool used, 
address 00027b 

The constant pool is used by this routine. 

Addresses L02, L03, LOU 

Address L01 

The alarm exit is not used by this routine. 



Drum Assignment: 



Machine Time: 



Mode of Operation; 



Address 66007b thru 66063b 



(& a 7k + l»55n) milliseconds for Entrance #1 
(8.I4.9 + l«55n) " for Entrance #2 
(8.72 + l*55n) u for Entrance #3 



Floating point, requiring SNAP to be in memory,. 



Coded by: 
Code Checked by: 
Machine Checked by: 
Approved by: 



C. Miller 
C. Miller 
C. Miller 
W. F. Bauer 



November, 1955 
November, 1955 
November, 1955 
November 25, 1955 
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Description 

This routine is a floating point version of DIE-1 evaluating the integral 



mean 



x n~ x o 




y dt 



The data mast be presented in floating point and the computation will place 

a floating point result in both the A and Q registers at the end of the 

routine. This routine requires that SNAP be in the memory. 

Programming Instructions 

There are three possible entries to this routine. These are identical to 

those used in DIE-1. 

Range of Parameters 

See DIE-1 

Execution Time 

Assuming the data to be in ES, the average execution times are, in milliseconds: 
8.7U + 1.55n (Entrance #l) 

8.ii9 + l.£5n (Entrance #2) 

8.72 + l.£5n (Entrance. #3) 

If, however, the data are in MD the time is n plus a fraction drum revolution, 

or an amount of time varying from 3!#i to 3U (n + 1) milliseconds. 

Mathematical Analysis 

See DIE-1. 

For coding convenience, this routine computes K as follows: 



Of 3 (o^l ^o g o + z l>] + Z 2J 



n-li 



§ C* 3 { 0*2(^1 ^o 2 o + z l)j + z 2 j + z 3 + ^ 7i 



n 
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with O^ = d ± o i+1 

and z ± = y ± + y n _ ± 

This formula.tioh is equivalent 'to the M defined in DIE-1. 

Error Analysis 

The truncation error in the quadrature formula is described in DIE-1. The 
round-off error in this routine is approximately equal to — A/h I ( f ) 
where J\ is a pseudo random variable in the interval 04 n^- 2" ° , h is the 
step size (h » x ±+i — x ±) > an< ^ 

x 
Y (x) = I y (t) dt 

x 
o 

while t is some point in the interval £ x , x J 

If NT" is the machine approximation to M then 

K* « M - ' ^/h Y(f ) ; ' 
Since M is the discrete approximation to the integral mean 



, x n 



dx 



n "* o * 
x 
o 



it is necessary to multiply M by the interval L «■ nh « x n - x Q in order to 
obtain the integral of y. This gives the relation 

L Y? - L K - n A Y(<j) 
and hence the error in the integral due to round-off within the routine is 

-n A Y(f) : 
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D 




R W C 


00000 




R W CONSTANTS 




00 


00000 


0000 


D 




R W T 


000 2 3 




R W TEMPS 




27 


0.0 


00000 


000 







00 L 00 


010 24 








2000 


00 


00000 


000 


D 




00 H 


10 26 








2002 


00 


00000 


000 


D 




00 C 00 


0106 5 








2051 


00 


00000 


000 


D 




S LOO 


5 1271 








6 6007 


00 


00000 


0000 







OS H 00 


5 127 3 








6 6011 


00 


00000 


0000 


D 




S C 00 


5 1312 








6 6060 


00 


00000 


00000 


SL 


T P 


00 C 4 


00000 




DUMMY 




6 6007 


11 


0205b 


10 000 


SL 1 


M J 


00 000 


BOOO 




EXIT 




6 6010 


45 


00000 


30000 


SHOO 


MA 


Q 000 


R W C 1 7 




EN T NO 1 




6 6011 


72 


10000 


0021 


SHO 1 


M.J 


00 000 


OOH 5 




EN T NO 2 




6 6012 


45 


000 00 


2 007 


S HO 2 


T V 


00 LO 1 


OOH 04 




EN T NO 3 




6 6 13 


16 


02 01 


2 006 


SHO 3 


R A 


00 L 1 


RWC16 




SET UP E X 1 


T 


6 6014 


21 


020 01 


0020 


S HO 4 


MP 


RWC16 


0000 




PAR TO ACC 




6 6015 


71 


000 20 


0000 


SHO 5 


T P 


2 


RWTOO 




SAVE F 




6 6016 


11 


00002 


2 7 


S HO 6 


T U 


A 000 


OOH 1 6 




SET IN YO 




6 6017 


1 5 


20000 


2022 


S HO 7 


L A 


A 000 


000 15 








6 6020 


54 


20 00 


0017 


S H08 


T U 


A 000 


OOH 1 8 




SET IN Y N 




6 602 1 


15 


20000 


2 2 4 


S H09 


T P 


00 H 1 8 


A 00 00 








6 6022 


1 1 


2 2 4 


20000 


8H10' 


S T 


00 H 1 6 


2 




N GOES TO 


F 


6 602 3 


36 


02022 


0002 


S Hi 1 


F L N 


00015 


0000 




FLOATING 


6 6024 


14 


4 4 17 


0000 


S HI 2 


1 1 


00 HO 1 


1362 


B R B 


BLOCK SNAP 




6 602 5 


11 


02003 


1362 


SHI 3 


2 3 


01325 


2 0000 


B 


CLEAR 




6 6026 


23 


01 325 


2 0000 


SHI 4 


2 3 


01326 


2 000 


B 


E 




6 6027 


23 


01326 


20000 


S H 1 5 


T U 


00 H 38 


H 2 




SET IN ALPHA 


6 6 3 


15 


02050 


2 2 6 


S H 1 6 


T P 


00 00 


000 




E PLUS Y 




6 6 031 


11 





1000 


S H 1 7 


37 


1362 


014 16 


B 


GOES TO 


E 


6 603 2 


37 


01362 


14 16 


S H 1 8 


T P 


00 000 


000 




E PLUS Y N 




6 6 3 3 


11 


00000 


10 000 


S H 1 9 


37 


0136 2 


14 16 


B 


T 


E 


6 603 4 


37 


01362 


14 16 


S H2 


T P 


00000 


000 




E TIMES ALPH 


6 6035 


11 


00000 


10000 


S H 2 1 


37 


1362 


1457 


B 


T 


E 


6 6036 


37 


01 362 


14 57 


S H 2 2 


R A 


H 1 6 


RWC15 








6 6037 


21 


02022 


00 17 


SH 2 3 


R S 


00 H 1 8 


R W C 1 5 








6 6040 


2 3 


02024 


00 17 


S H 2 4 


R A 


00 H 20 


RWC15 








6 6041 


21 


020 26 


17 


S H 2 5 


T J 


00 LOO 


OOH 16 








66042 


42 


02000 


20 22 


S H 2 6 


R A 


00 H 1 8 


R W C 1 5 




USE H18DUMMY 


6 604 3 


21 


02 24 


00 17 


S H 2 7 


T P 


00 H 1 6 


OOH 28 








6 6044 


11 


02022 


02 36 


S H 2 8 


00 









E PLUS Y 1 




6 6 4 5 


00 


00000 


000 


S H 2 9 


37 


1362 


01416 


B 


TO E 




6 60 46 


37 


01362 


14 16 


S H 30 


R A 


H 2 8 


RWC15 








6 6 47 


21 


02036 


00 17 


SH 31 


T J 


00 H 1 8 


H 2 8 








6 6050 


42 


020 24 


2 36 


SH 32 


T P 


2 


00 0-0 




DIVIDE E 




6 6051 


11 


00002 


10000 


SH 3 3 


37 


0136 2 


01507 


B 


BY N 




6 6 052 


37 


01362 


1507 


S H 3 4 


27 


01325 


13 2 6 


B 


PACK 




6 605 3 


27 


01325 


1326 


S H 3 5 


L Q 


A 000 


00 




ANS TOQ ACC 


6 6 5 4 


55 


20000 


0000 


S H 36 


1 1 


15 5 7 


13 6 2 


B 


REVIVE SNAP 




6 6055 


11 


01557 


1362 


SH 37 


T P 


RWTOO 


0002 




RESTORE F 




6 6056 


11 


000 27 


0002 


S H 38 


45 


00 C 00 


L 1 


B R R 






6 6 57 


4 5 


02051 


2 001 


S CO 


2 


798 21 


6 27 6 0- 


-OIF 


A 




6 6060 


17 


74 364 


2 3076 


SC 1 


1 


4 170 6 


16 114 


F 


L 1 




6 6 061 


20 


155 26 


11062 


SC 2 


fi 


56 56 2 


9 229 0- 


-OIF 


P 2 




6 6 062 


20 


06664 


36651 


S CO 3 


1 


026 38 


8 8889 


F 


H 3 




6 606 3 


20 


14 066 


2660 
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Identification Tag: 

Type: 

Assembly Routine Spec 

Storage : 



LOG-1 
Pg. 1 of 

THE RAKO-WOOLDRIDGE CORPORATION 
Los Angeles l\$ t California 

Fixed Point Natural Logarithm 

Spe c if ic at ions 

LOG-1 

Subroutine 

SUB 51201 03517 

18 instructions, addresses 
K00 thru K17 

17 constants in program, addresses 
COO thru C16 

35 words total program storage, addresses 
KOO thru IDL7 
COO thru C16 

2 words temporary storage pool used, addresses 
00027b thru 00030b 

The constant pool is used by this routine. 



Program Entrance: 
Program Exit: 
Alarm Exit: 



Address K02 
Address KOI 
The alarm exit is used by this routine, 



CO 



CO 

6 
o 

o 



X 

a, 



Drum Assignment: 
Machine Time: 

Kode of Operation: 

Coded by: 
Code Checked by: 
Kachine Checked by: 
Approved by: 



Address 65701b thru 657U3b 



2,63 milliseconds (minimum) 

lu5l " (average) 

6.39 " (maximum) 

Fixed point 



C. Killer 
C, Killer 
C. Killer 
V/« F. Bauer 



November, 1955 
November, 1955 
November, 1955 
November 22, 1955 
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Description 



This subroutine computes a single precision approximation to In x for any 
positive x which can be accommodated in the double length accumulator scaled at 

The result .3:s:f;'left in the accumulator, at the end r p£ f t- he .routine, scaled at 
2^o Since 

llln x Z_ In 2 3 ^ = 2i|.2 
we see that #ie result,: may well extend into A , but will never overflow A. 
Programming Instructions 

1. Place x-2 3 ^ in A ,-(0 Z_ x Z. 2 3 ^) 

2. Enter the subroutine with RJ 00M01 00M02^|assumJjig the first word of 
this subroutine is stored at 00K00). 

3. Control is returned to cell p + 1 if the RJ order is contained in cell p. 
The accumulator will contain (in x) • 2-» 

Alarm Conditions 

1. If x £ then the alarm routine ALR-1 is entered. This initiates the 
printing of the word "alarm" on the flexowriter, followed by the octal 
address of the RJ instruction used to enter LOG-1 and the contents of A 
and Q. 
o 2. If x ^ 2^ then a multiply-add overflow may occur in line 00M0f> of 
co the subroutine. If the overflow does not occur (and therefore does not 

6 

o halt the machine; then the answer produced is correct to within the 

•—4 

x error described below. 

Mathematical Method 

Assuming that x is strictly positive, i.e. x»2 =^ 1, then the routine scale 

factors x in order to obtain 

x = 2 s u 

where s is integral and j- ^ u ^ 1, 
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Setting 
one obtains 
with 



v = h/3 u - 1 

x - 2 s u = 2 s (3/h) (v + 1) 

- 1/3 ^ v ^ 1/3 



Hence In x = s(ln 2) + In 3/h + In (v + l) 

The routine evaluates an eleventh order polynomial api roximation to In (v + l) 

over Vie interval - l/3' ^= v ^- 1/3. This polynomial was obtained with the aid 

of CVr-0 and lias a maximur error of 3^3' x 2" " > . The twelve coeiTieients cf this 

polynomial are inclvdec in the accor.pmyin-'; listing, it is tc be noted t.hat the 

first rnd second ceef dicients are modified by the ad'ticn of In 3/'i and -1 

respectively, 

Krrcr Anal ysis . 

The errcr in th. r ac' ine's approximation tc In x will not exceed, in abac lute 

value 

( .72 ■ I In x 



+ U60) -2~ r \ 



'flirt i: 



(A),. - (In x) *2 



35 



In x 



+ C.60 



Z .72 

lest cf the error is Ov.c to round-off within the routine. The actual error 
is usually less than the u;.;.cr bound stated here. 
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KW-113 



LOG-1 

Pg. h of k 



1) 




R W C 


ooooo 








R W 


CONSTANTS 




00 


ooooo 


OOOOO 


1) 




R W T 


2 3 








R W 


I f M P S 


27 


00 


ooooo 


OOOOO 


o 




M 


1 2 4 












2 


00 


ooooo 


OOOOO 


i) 




00 C 


1 4 2 












2 2 2 


00 


ooooo 


OOOOO 


t) 




S M 


5 12 1 












6 5 7 1 


00 


ooooo 


OOOOO 


n 




S C 


5 12 19 












6 5 723 


00 


ooooo 


'0 


S M o 


3 7 


7 5701 


7 5 7 3 


B 








ALARM 


6 5 7 1 


37 


7 5701 


7 57 3 


S M 1 


M J 


ooooo 


A 










EXIT 


6 5 702 


4 5 


ooooo 


2 


SM0 2 


T J 


R W C 1 6 


O0M00 








K 


IF X P S 


6 5 703 


4 2 


20 


2 


S M 3 


S F 


A 


C 










K TO COO 


6 5 7 4 


7 4 


2 00 


2 2 2 


8 M 4 


s s 


00 C 1 


0035 












6 5 7 5 


3 4 


2 2 3 


4 3 


S M 5 


M A 


B 


C 2 








V 


TIMES 2 TO 


6 5 7 6 


72 


3 00 


02014 


S M o 


T P 


B 00 


R W T 










35 TO RWTO 


6 5 7 07 


1 1 


300 00 


2 7 


S M 7 


L A 


C b 


2 36 








H 


OF V TIMES 


6 5 7 10 


5 4 


2 27 


2 4 4 


S M 8 


R P 


2 11 


O0M1O 










2 TO 3 5 


6 5 7 11 


75 


2 13 


2 12 


S M 9 


P M 


00 C 6 


R W T 










TO R W T 1 


6 5 7 12 


2 4 


020 30 


2 7 


S M 1 


T P 


B 


R W T 1 












6 5 7 13 


1 1 


3 00 


3 


S M 1 1 


T P 


00 C 00 


A 00 








S 


1 S K OR 7 2 


6 5 7 14 


1 1 


2 2 2 


2 000 


SMI? 


T J 


C 3 


M 1 4 










MINUS K 


6 5 7 15 


4 2 


2 2 5 


2 16 


S M l 3 


S T 


R W C 1 8 


A 












6 5 7 16 


36 


2 2 


2 000 


S M 1 4 


M P 


A 


C 4 












6 5 7 17 


7 1 


20000 


2 026 


SM15 


A T 


R W T 00 


A 












6 5 7 2 


35 


27 


2 000 


y m i 6 


A T 


R *V T 1 


A 








A N S IN A 3 5 


6 5 721 


35 


30 


2 


S Ml 7 


M J 





M 1 












6 5 7 2 2 


4 5 


OOOOO 


2 1 


S C 














P R 


IVATE TEMP 


6 5 7 2 3 


00 


OOOOO 


OOOOO 


s C 1 


30 





OOOOO 


B 






3/ 


4THS ' 3 5 


6 5 7 2 4 


30 


OOOOO 


OOOOO 


S C 2 


1 2 


5 2 525 


2 5253 


B 






1/3 R IJ 3 5 


6 5 7 2 5 


1 2 


5 2 5 2 5 


2 5 2 5 3 


S C 3 





00000 


37 












6 5 7 2 6 


00 


OOOOO 


4 5 


S C 4 


6 


9 3 14 7 


180 5 6- 


-0 


1 


3 5 




L N 2 


6 5 7 2 7 


2 6 


13 4 4 1 


37 676 


S C 5 


1 


2 8 2 5 1 


8 4 96 8- 


-0 


1 


3 4 


COEF OF 11 


6 5 7 3 


2 


3 2 50 


7 17 6 


SC0 6- 


C 1 


3 3 6 4 9 


7 6 67 6- 


-0 


1 


3 4 




11TH 0RD10 


6 5 7 3 1 


75 


6 7 111 


17 7 2 


S C 7 


1 


507 7 


O 9 4 7 7 - 


-0 


1 


3 4 




A P P R X 9 


6 5 7 3 2 


01 


5 3 4 6 2 


5 2 16 6 


SC08- 


1 


2 5 3 


6 6 4 8 2- 


-0 


1 


3 4 




T L N 8 


6 5 7 3 3 


76 


4 4 4 7 


16 001 


SC09 


1 


4 3 313 


4 13 6 2- 


-0 


1 


3 4 




OF 1 PL US7 


6 5734 


2 


2 2 6 1 


4 14 2 


SC10- 


1 


66 9 3 2 


2 4 9 - 


-0 


1 


3 4 




V V E R 6 


6 5 7 3 5 


75 


2 50 37 


4 2 5 7 6 


S C 1 1 


1 


9 9 9 8 3 


2 5 7 4 4- 


-0 


1 


3 4 




N E G 1/3 R D 5 


6 5 7 3 6 


3 


14 6 20 


6 4 4 72 


S C 1 2- 


2 


4 9 9 9 2 


9 6 4 8 4- 


-0 


1 


, 3 4 




TO 4 


6 5 7 3 7 


7 4 


00003 


5 4 36 


S C 1 3 


3 


3 3 3 3 3 


5 9 8 9 6- 


-0 


1 


3 4 




P S 1/3 R 3 


6 5 7 4 


05 


2 5 2 52 


6 3 4 5 1 


SC14- 


5 


000 


678 1- 


-0 


1 


3 4 


M 


1 N U S V 2 


6 5 7 4 1 


6 7 


7 7 7 7 7 


7 5 5 62 


S C 1 5- 


1 


2 4 


ooooo- 


-0 


9 


3 4 




U 


6 5 7 4 2 


7 7 


7 7777 


7 7752 


SC16- 


2 


8 7 6 R 2 


7 2 4 5- 


-0 


3 


3 4 


L N 


3/4THS 


6 5 7 4 3 


7 3 


3 1323 


5 7 3 5 4 
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RW-114 



EXP-2 

Pg. 1 of k 



Identification Tags 

Type? 

Assembly Routine Spec: 

Storage : 



Program Entrance: 
Program Exit: 
Alarm Exit: 
Drum Assignment: 
Machine Time: 

Mode of Operation! 



, THE RAMO-WOOLDRIDGE CORPORATION 
Los Angeles kS, California 

Fixed Point Exponential Routine (e x ) 
Specifications 

EXP-2 

Subroutine 

SUB 50916 03713 

2k instructions, addresses 
LLOO thru LLOi; 
LOli thru L22 

13 constants in program, addresses 
COO thru C12 

37 words total program storage, addresses 
LLOO thru LLOii 
L0!± thru L22 
COO thru C12 

2 words temporary storage pool used, 
addresses 00027b thru 00030b 

The constant pool is used by this routine, 

Address LL02 

Address LL01 

The alarm exit is used by this routine. 

Address 50916b thru 50952b 

2.3 milliseconds (minimum) 
3.3 " (average) 
ii.3 " (maximum) 

Fixed point 



Coded by: 
Code Checked by: 
Machine Checked by: 
Approved by: 



C. Miller 
C, Miller 
C, Miller 
W, F. Bauer 



October, 1955 
October, 1955 
October, 1955 
November 15, 1955 
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RW-114 

EXP-2 
Pg. 2 of h 
Description 

x y~> 

This subroutine computes e when entered with x»2 in the accumulator where 
x has the domain 

-(ln2) (2 3 ^ + 2" 1 ) ^ x *L 3i;.5 (ln2) 
The result is left in the accumulator with scaling Tr-* $ assuming that the 
capacity of the double length accumulator is not exceeded* 
The routine employs the Polynomial Multiply (PK) instruction. 
Programming Instructions 

1. Place x«2 3 ^ in A. 

2. Enter the routine with RJ 00K01 00K02, where 00K00 is the location of the 
first word of the subroutine. 

3. The subroutine returns control to the cell following the RJ instruction 
with e x -2 3 ^ in A. 

Alarm Conditions 

1. If x falls in the interval 

%6 (ln2) ^ x -^ (ln2) (2# - 2" 1 ) 

then the alarm routine ALR-1 is entered. This initiates the printing of the 

word "alarm" on the flexowriter, followed by the octal address of the RJ 

instruction used to enter EXP-2, 

This alarm condition is equivalent to 
e x ^ 2 3k.$ 

rp and. hence, in terms of the scaled result 

2 e*.23S^2 6 ^ 

o 

<> This value will nearly overflow in A and therefore becomes an upper limit. 

i- 

g 2. For x^ - (ln-2) (2 3 ^ + 2" 1 ) 
or x^ (ln2) (2 3 ^ - 2" 1 ) 
a divide overflow will occur at cell 00K03 of the subroutine. 
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I2W-114 



EXP-2 
Pg. 3 of h 



3, If ALR-1 was entered (or at the end of the routine) one can obtain the 
quantities 

z.2^ = (00030b) 
s = (00027b) 
where J /T- ^ J~¥ 
and e x « 2 s z 

This is not true in the event of a divide fault. 
Mathematical Method 

The routine finds q, an integer such that 
x = q (ln2) + r 

where |r \ <s ln2 
II g- 

This gives e x - (e ln2 )^ • e r - 2^e r « (2 q +1 )>( e r ) 

2 

Q + 1 

Since the factor 2 H is easily applied by shifting, it is only necessary to 

calculate the quantity e /2. This is accomplished by a 7th order approximating 

polynomial where the domain of r is 

- In2 ^ r ^ ln2 
~T" 2 

This polynomial was obtained with the aid of routine CVF-0. The coefficients 
of the polynomial are listed in the accompanying code listing. The maximum 

discrepancy between the function e r /2 and the polynomial, in the interval 

-3£> 
stated above, is .75 x 2 « 

Error Analysis 

The error in the machine's approximation to e x is bounded in all cases by 



K11.3 + .7 |x| ) e x + lj.2"* 3 ^ 



That is 

(A) f - e x .2 33 |z (11.3 + .7 j x | ) e x + 1 
Most of the error is due to round-off within the routine. The actual error is 
usually less than the bound stated here. 

8-23 



X 

(X, 



RW-114 



EXE-2: 



o 



D 




RWCOO 


000 








RW CONSTANTS 




00 


00000 


OOOOO 


D 




R W TOO 


000 2 3 








R W TEMPS 


2 7 


00 


00000 


OOOOO 


D 




OL L 00 


010 24 










2000 


00 


ooooo 


OOOOO 


n 




00 L 00 


010 25 










200 1 


00 


ooooo 


ooooo 


D 




00 C 00 


01048 










20 3 


00 


ooooo 


ooooo 


D 




S L L 00 


509 16 










6 524 4 


00 


ooooo 


ooooo 







S L 00 


509 17 










6 5245 


00 


ooooo 


ooooo 


D 




S C 00 


5 0940 










6 527 4 


00 


ooooo 


ooooo 


SL L 


37 


7 570 1 


7 5702 


B 






ALARM 


6 524 4 


37 


7 5701 


7 5702 


SL L 1 


M J 


00 000 


AOOOO 








EXIT 


6 524 5 


4 5 


ooooo 


2 


S L L 2 


A T 


00 C 1 2 


AOOOO 










6 5246 


35 


02044 


2 


S L L 3 


D V 


00 C 00 


RKTOO 








Q TO RKTOO 


6 5247 


73 


020 30 


00027 


SL L 4 


S T 


00 C 1 2 


RWT01 








R TO RWT01 


6 5250 


36 


02044 


00030 


S L 4 


L A 


00 C 4 


200 36 










6 52 51 


54 


02034 


20 04 4 


S L 5 


RP 


20007 


OOL 07 










65252 


75 


20007 


2 10 


S L 6 


PM 


00 CO 5 


R WT 01 










6 5253 


24 


02035 


0030 


SL 07 


T P 


B 000 


RWT01 








EXP R TO T01 


6 5254 


11 


30000 


0030 


SL08 


R A 


RWTOO 


R tt C 1 6 








S IS QPLUS1 


6 5255 


21 


00027 


020 


S L 09 


S J 


00 L 1 


OOL 17 










6 5256 


4 6 


0201 3 


02022 


S L 1 


T V 


00 CO 2 


OOL 14 










6 5257 


16 


020 32 


02 17 


SL 1 1 


A T 


00 CO 1 


AOOOO 








S NEG 


6 5260 


35 


020 31 


20000 


SL 1 2 


T J 


00 CO 2 


OOL 14 








TEST FORZERO 


6 526 1 


42 


2 3 2 


2 01 7 


SL 1 3 


T V 


A 00 00 


OOL 14 










6 526 2 


16 


20000 


2 17 


SL 1 4 


L A 


RWT01 


000 00 








SHIFT RIGHT 


6 526 3 


54 


00 30 


OOOOO 


SL 1 5 


T P 


AOOOO 


AOOOO 










6 526 4 


11 


20000 


20000 


SL 1 6 


M J 


00000 


L L 01 










6 5265 


45 


ooooo 


02001 


S L 1 7 


A T 


00 CO 3 


AOOOO 








S PO S 


6 5 266 


35 


020 33 


20 000 


SL 1 6 


T J 


00 C 02 


OOL 20 








EM M 1 N E N T 


6 5267 


42 


020 32 


2025 


SL 1 9 


M J 


00 000 


OLLOO 










6 5270 


45 


OOOOO 


2000 


SL 20 


T V 


AOOOO 


OOL 21 










6 5271 


16 


20000 


02 026 


SL 21 


L A 


RW TO 1 


OOO 00 








SHIFT LEFT. 


6 5272 


54 


00030 


OOOOO 


S L 2 2 


M J 


00 000 


OL L 01 










6 5273 


45 


OOOOO 


2001 


S C 


6 


9 3147 


180 56- 


-0 


1 


3 5 


NATLOG OF 2 


6 5274 


26 


13441 


37676 


S CO 1 ' 





00 000 


2 0110 


B 






CO N 


6 5275 


00 


OOOOO 


20110 


S CO 2 





00 000 


2 0044 


B 






S T A 


6 5276 


00 


OOOOO 


20044 


SCO 3 


00 


00 000 


2 000 


B 






NTS 


6 5277 


00 


OOOOO 


20000 


S CO 4 


1 


9924 3 


6 5 60 0- 


-0 


4 


33 




6 5 300 


00 


00064 


16602 


S CO 5 


1 


3 948 5 


7 676 0- 


-0 


3 


3 3 


C S B 34 


.6 5 30 1 


00 


00555 


5 1650 


S C 6 


8 


33 324 


84740- 


-0 


3 


33 


C Y 


6 5 302 


00 


04 210 


4 055 3 


S C 7 


4 


1666 2 


1 8354- 


-0 


2 


3 3 


E A 


6 5 303 


00 


25252 


4 3112 


S C08 


1 


6666 6 


66994- 


-0 


1 


33 


F L 


6 5 304 


01 


25252 


5 2 561 


S C 09 


5 


00000 


10 7 7- 


-0 


1 


33 


F E 


6 5 305 


04 


OOOOO 


00135 


S C 1 


09 


9 9999 


9 9 9 9 7- 


-0 


1 


33 





6 5306 


10 


OOOOO 


OOOOO 


SC11 


09 


9999 9 


9 9996- 


-0 


1 


33 




6 5 307 


10 


OOOOO 


OOOOO 


S C 1 2 


06 


9 3147 


18056- 


-0 


1 


34 


HALF LN OF 2 


6 5 310 


1 3 


056 20 


577 37 
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CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

!M NO E T I I* r SAN OlfcGO CALIFORNIA PAGE IS 002— 1 

Bye B. Gorkln report ZM I4.9I 

CV-H5 MODEL All 

DATE 12-27-55 

ALAR!, OCTAL AHD IXEXPHIIH' PACKAGE IE 002 
( revised 12- 27- 55 ) 

The Alar®, Octal and Flexprint Package consists of an alarm routine, 
an octal print subroutine, and a flexprint subroutine. 

The alarm routine la used" to wave a flag whenever a test show that 
an undesired event has occurred. There are two entries to the alarm 
routine for this purpose, ., 

(1) 37 7^000 76OOI ( main routine ) 

(2) 57 76000 76002 ( subroutine ) 

Entry f i ) is used to indicate an alarm condition in the main routine, 
entry (2), is used for an alarm condition in a standard coded sub- 
routine. In either case the main routine address is printed out. 

Entry to the alarm routine causes the following information to be 
printed out*.. 

TJ.T.TJJJJJJJI* BRBBBRRRRRRR alarm xxxxx 

T1TTJJJJJJJJ.T1 Is (L) in octal 

RRRBHRRimHRR is (R) in octal 

xxxxx is the main routine address. 

/Registers A and Q and location 00000 are used for temporary storage. 
After an alarm, location 00000 contains 1*5 00000 xxxxx+1 . After the 
. /printout, the computer stops with the instruction 56 00000 00000 set 
/up. To continue from line xxxxx+1, push the start button. 

' h The location of the alarm routine is such that references to it 
I are not modified by the* assembly modification routine ( SC 001 ). 
,' Thus all subroutines may refer directly to the entry and exit of 
the alarm routine. : 

I •-.■'. '.■■' .-; ' ' 

' ■ ■'.''■ '''■'. 

This revised alarm routine does not use the,, constant pool or the 
tes^iorary pool. 

Flexcodes for the octal digits 0-7 are stored in locations 
760£7j- 7601*6 respectively. 

The alarm routine resets Itself completely— its sum remains 
constant with use. 

The alarm routine has built into it, octal and flexprint subroutines 
which* may be used as such by the programmer. These portions of the » 
alarm\rdutlne are also self resetting— the use of these subroutines 
does n'ot alter the sum of the Alarm, Octal and Flexprint Package. 

These octal and flexprint subroutines are described on the following 

.fpage. 
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CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

FORM NO . C T <Af'- 'QQrlc-fal SAN DIEGO CALIFORNIA 

CV-115 
i. To print octal Information... 

entry result 

57 76022 76002 C.R., (L), space, (R), space — *- typewriter. 

final state... (Q) « 00 00000 00001 
(L) » (R)initiol 
(R) « 00 00000 00000' 

(00000) * *5 ooopo 76000 

57 76016 76OO5 C.R., (L), space — •-> typewriter, 

final state... (Q) - 00 00000 00001 
(h) * 00 00000 00000 
(R) ■ a print order 
(00000)is not altered. 

57 76016 7600* (L), space — +- typewriter. 

final state... (Q) - 00 00000 00001 
(L) * 00 00000 00000 
(R) « a print order 

r (00000) Is not altered. 

37 76016 76005 leftmost five octal digits of (L) and 

space — •- typewriter. 

final state... (Q) « 00 00000 00001 
(L) « (L)initial •2** 
(R) « a print order 
(00000) not altered. 

37 76016 76OO6 leftmost two octal digits of (L) and 
..-; space *- typewriter. 

- final state... (Q) * 00 00000 00001 
j (L) » (L)initial -2 6 

'...•%■■ (R'J » a print order 

-r \ (00000) not altered. 

37 76022 76017 (00000), space — •-typewriter. 



PAGE 


IE 002-2 


REPORT 


ZM U91 


MODEL 


All 


DATE 


12-27-55 



final state. .0 (Q) - 00 00000 00001 
(L) - 00 00000 00000 
2 ' ■ ' (R) * a print order 

7 i (00000) » ki 00000 76000 



^ 2. To pHnt flex information... 

c* 



*- / 37 76016 760*7 six flexcode characters in (L) and 
£J / space •- typewriter. 

final state. .. (Q) not altered 

(L) m 00 00000 00000 
(R) - 00 00000 00000 
(00000) not altered. 
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>RM NO C T. ■ I Oft r 

By i Oorkln 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



CV-115 



PAGE 
REPORT 
MODEL 
DATE 



IB 002-3 

All 
12-27-55 



ALARM PRINT ROUTINE IE 002 



76000 


45 00000 76000 






76001 


. 16 76026 76022 




76002 


11 20000 00000 


STORE (R) 


76003 


61 00000 76047 


CARRIAGE RETURN ^ / 


7 6004 


55 76012 00005 


SET FOR 12 DIGITS " 


76005 ' 


/ 55 76012 00011 


SET FOR 5 DIGITS , 


76006 


55 76012 00012 


SET FOR 2 DIGITS 


76007 


34 20000 00003 


*« 




7 6010 


32 76037 00000 






7 6011 


11 20000 76012 




OCTAL PRINT LOOP 


76012 


00 01000 10001 






76013 


44 76014 76007 


.j 


. . \- .-.,.-'. '..-. ';,-.^>- 


7 6014 


11 10000 76012 


RESTORE FLAG 


76015 


61 00000 76021 


SPACE 


76016 


37 76016 76017 * 


. SWITCH 


76017 


31 00000 00044 


(000.00-)— +*(l) . - 


76020 


11 76000 00000 


STORE JUMP IN CELL. 00000 ", 


76021 


,37 76016 76004 


PRINT (00000) 


76022 


37 76022 76023 


SWITCH 


7 6023 


31 .76000 00017 


SET TO OBTAIN 


76024 


15 20000 76025 


MAIN ROUTINE ADpRESS . > 


76025 


16 76000 00000 


JUMP TO MAIN ROUTINE— *- (00 


76026 


15 76023 76025 


RESTORE / ■■.'*,;' 


76027 


16 76027 76000 


RESTORE 


7603Q 


31 76042 00047 


:■' ' " *" ' ' '• '■'■■ ' .■'. 


76031 


37 76016 76047 


PRINT "ALARM*. 


76032 


41 00000 76033 


ADJUsV AbDRESS FOR PRINTING 


76033 


31 20000 00071 


• ■' 


76034 


37 76016 76005 


PRINT 5 DIGIT ADDRESS 


76035 


56 00000 00000 


STOP 


76036 


00 00000 00000 


AVAILABLE 



o~fc7 



FO»M NO. E. T . I J» r 

By: Garkin 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEOO, CALIFORNIA 



CV-115 



page ie 0024* 

REPORT ZM h9l 

All 
12-27-55 



MODEL 
DATE 



m 

i— t 

1 

co 

d> 

o 
o 



X 

a. 



76037 


61 00000 


76037 PRINT ORDER, FLEX 





76040 


00 00000 


0005? 


, FLEX 


1 


76041 


00 00000 


00074 




2 


76042 


43 01130 


12070 ■ 


ALARM" } 


3 


76043 


00 00000 


00064 




4 


76044 


00 00000 


00062 




5 


76045 


00 ooooo 


00066 




6 


76046 


00 ooooo 


00072 




7 


76047' 


61 00000 


20045 






76050 


34 20000 


00006 


►FLEX PRINT LOOP 




76051 


47 76047 


76015 
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Identification Tag: 

Type: 

Assembly Routine Spec: 

Storage : 



Program Entrance: 
Program Exit: 
Alarm Exit: 

Drum Assignment: 
Machine Time: 

Mode of Operation; 



THE RAT 0-WOOLDRIDGE CORPORATION 
Los Angeles h$ , California 

Nth Root Routine 
Spe c if i c at ions 
ffiT-0 
Subroutine 
SUB 51316 03701 

36 instructions, addresses 
10F00 thru 10F35 

1 constant in program, address 
10F36 

37 words total program storage, addresses 
10F00 thru 10F36 

k words temporary storage pool used, 
addresses 00027b thru 00033b 

The constant pool is used by this routine. 

Address 10F02 

Address 10F01 

The alarm exit is used by this routine. 

Address 66061|b thru 66130b 

Average execution time 

2(n-2) + 5 milliseconds for n 4= 50 

Fixed point 



NRT-0 

P[> 1 of h 



Coded by: 
Code Checked by: 
Machine Checked by: 
Approved by: 



W. Frank 
W. Frank 
W. Frank 
W. F. Bauer 



November 25, 1955 
Number 28, 1955 
Hggember 30, 1955 
December 1, 1955 
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co 



o 
a- 



x 
a* 



NRT-0 

Pg. 2 of k 



Description 

This subroutine extracts the n tn root of any number M, scaled at 2^5, and 

such that 

| M - 2 3 ^ | 4 2 3 ^ -1. 
n must be an integer in the range 

2 Z n Z_ 216 
The routine must be entered with M»2-^> in A and n«2° in Q. The result will 
be left in A, scaled at 2^5, at the conclusion of the routine* 

Programmirig Instructions 

1. Place K*2^ in An. (A,) is ignored by this routine, 

2. Place n»2° in Q. 

3. Enter the subroutine with RJ 00F01 00F02, where 00F00 is the location 
of the first word of MRT-O. 

k» The subroutine returns control to the cell following the RJ instruction 
with ( VT) «2 3 ^ in A. 

Alarm Conditions 

The subroutine enters the alarm routine ALR-1 if n is negative or M is 
negative for n even. In either case, the word "alarm" is printed on the 
flexoitfriter, followed by the octal address of the RJ instruction used to 
o enter NRT-O. 



Execution Time 

The time taken to find the n^ root of a number is inversely proportional to 
the magnitude of the number and directly proportional to the size of n. An 
average estimate, for n ^ 5>0, is approximately 3(n-2) + 5 m ill iseconds* 
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Mathematical Method > 

; j 

An iterative procedure, employing the Newton-Raphson method*, is used to 
solve the equation 

x 11 = M 
The process is of second order and is defined by 

ImI 



x i+l " x i + n 



where x »2^.» z?5 «. i 



H 



n-1 



- x^ 



The iteration is terminated when 

1 M I - Xi^O 
/ \n-l 

A secondary test is made to insure 



M 



n-1 



z(x ± y 

This test is necessary, even though. the process is monotonia} for, it is 
possible that truncation of the result of multiplication and division can 
violate this property. In that event, x. is taken as the solution. 
A special case is M ■ 0, where the solution is x ■ for all p. 

Accuracy 

mmmmmmmmmmmtmmMm 

The error in the result of this routine was found to be less than lO""-^ j 
that is, for an input argument, which is correct to 3£ bits, one can expect 
an answer which may be incorrect at most in the right octal digit. 



Scarborough, J.B., Numerical Mathematical Analysis , second edition, The 
John Hopkins Press, Baltimore, Md., 1950, p. 1°2» 
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NRT-0 

fe. h of h 







10F 
10F0 
10F0 
10F0 
10F 
10FO 
10F 6 
10F07 
10F08 
10F09 
10F 1 
10F11 
1 F 1 2 
IDF 1 3 
10F1 4 
10F 1 5 
10F 16 
10F 17 
10F 18 
10F 19 
10F 30 
10F 31 
10F 32 
10F 23 
10F24 
10F25 
10F 36 
10F 37 
10F 38 
10F 39 
10F 30 
10F 31 
10F 32 
10F 33 
10F 34 
10F 35 
10F 36 



37 
Md 
Z J 
T P 
TP 
QT 
Z J 
TP 
S J 
TM 
TP 
54 
S J 
TU 
RS 
RS 
SP 
RP 
MP 
TP 
TP 
T J 
M J 
L A 
V 
ST 
S J 
V 
A T 
M J 
TP 
S J 
T N 
M J 
T P 
M J 
37 



00 F 00 
10F00 
CPOO 
75701 
00000 
OOFO 3 
AOOOO 
QOOOO 
00016 
OOFO 9 
CPU 
OOFOO 
0CP1 1 
OOF 36 
OCP10 
OOFOO 
AOOOO 
O0F17 
OOF 17 
0CP1 2 
00000 
80000 
BOOOO 
0CP14 
0CP1 3 
00000 
AOOOO 
0CP1 3 
OOP 12 
OOF 27 
0CP10 
0CP12 
00000 
0CP11 
OOF 33 
OCP 1 3 
00000 
0CP1 2 
00000 
77777 



O 1 ®4'A> 

5 %> %g 
Od0t-3 

7 5 i 3 B 

°. I • i 
O&f&i 

AOOOO 

6 F 7 
A 
0Fp9 

3'0|)I r 7 BRB 
OOF 13 
00/|% 7. 
tf "b 15 
000 1 5 
000 35 
OOF 19 
0CP12 
CP 1 3 
AOOOO 
OOF 3 3 
OOF 30 
000 35 
AOOOO 
AOOOO 
OOF 30 
AOOOO 
CP 13 
OOF 16 
AOOOO 
OOF 34 
AOOOO 
O0FO1 
AOOOO 
OOFO 1 

7 7777 B 



ALARM 

EX I T 

AR G ZERO 



N EVEN OR 
OD 

ALARM 

SET XO VALUE 

H NEGATIVE 



SET UP B 

X I TH TO N- 1 



CONVFRGENCE 

XI TH PLUS 1 



2000 
6 606 4 
1 5 
6 6064 
6 6065 
6 6066 
66067 
6 6070 
66071 
6 6073 
6073 
6074 
6075 
6076 
6077 
66100 
6610 1 
66103 
6 610 3 
6 6104 
66105 
6 6106 
66107 
6 6110 
66111 
66112 
66113 
6 6114 
6 6115 
6 6116 
66117 
66120 
66121 
66122 
66123 
66124 
66125 
6 612 6 
66127 
66130 



00 
00 
00 
37 
45 
47 
11 
11 
51 
47 
11 
46 
12 
11 
54 
46 
15 
23 
23 
31 
75 
71 
11 
11 
42 
45 
54 
73 
36 
46 
73 
35 
45 
11 
46 
13 
45 
11 
45 
37 



00000 
00000 
00000 
75701 
00000 
02003 
30000 
10000 
00030 
02011 
00030 
2 
00030 
02044 
00027 
02000 
20000 
02021 
02021 
00031 
00000 
30000 
30000 
00033 
00032 
00000 
20000 
00032 
00031 
02033 
000 27 
00031 
00000 
00030 
02040 
00031 
00000 
00031 
00000 
77777 



000 

0000 

00000 

75702 

00000 

02001 

00030 

0027 

2 0000 

02007 

2 00 0, 

02011 

00033 

00031 

2 17 

02015 

02021 

00017 

00017 

00043 

02023 

00031 

00032 

20000 

02027 

2 3 6 

00043 

20000 

20000 

02036 

20000 

00031 

03020 

20000 

02042 

20000 

02001 

20000 

02001 

77777 
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Los Angeles 45 , California 

Fixed Point Decimal Card Read-In Routine (revised) 

.Specifications. 
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Identification Tag: 

Type J 

Assembly Routine Specs 

Storage i 



Program Entrance t 
Program Exit: 
Alarm Exits 

Drum Assignments 
Machine Timet 
Mode of Operations 

Coded by i 
Code Checked bys 
Machine Checked byt 
Revised by: 
Approved by: 



CRI-2 

Subroutine 

SUB 51353 25039 (See special assembly instruc- 
tions ) 

201 instructions, addresses 
°' ^OOEOO thru"04E35 

49 constants in program, addresses 
00N00 thru 00H38 

24- words temporary storage required, but 

not stored with the program , 

250 words total program storage, addresses 
00E00 thru 00H38 

10 words temporary storage pool used, 
addresses 00027b thru 00040b 

The constant pool is ug^d by this routine 

Address OOE02 

Address 00E01 

The alarm exit is used &jy this routine. 

Address 66l3lb thru 66522b 
•5 seconds per card 
Fixed point 



C. Koos 

C. Koos 

C. Koos 

C. Koos 

W. F, Bauer 



November 9 f 1955 
November 11, 1955 
November 14, 1955 
December 1, 1955 
December 9, 1955 
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This routine reads fixed point decimal numbers from cards, converts these 
numbers to their octal equivalents and stores them in the computer at loca- 
tions specified by a base address of the parameter word and a location 
number on the cardo 

The input cards are divided into four fields, occupying columns 5-23, 24-4.2, 
43-61 and 62-80. Each field contains in the order indicated: 

a. a five place decimal location number which is added to the 
base address of the parameter word and which positions the 
number in the proper cello 

b. a ten digit fractional mantissa with decimal point at extreme 
left of field o 

c. a two digit exponent of 10 (decimal scaling factor). 

d. a two digit exponent of 2 (binary scaling factor) which 
scales the number in the computer accordingly. 

A punch in the eleven row above the least significant digit of the mantissa 
or the scaling factors indicates a negative value. Any number of the fields, 
in any combination, may be used. Blank portions are ignored. The routine 
will also ignore completely blank cards, and will stop only upon finding a 
12 punch in column 80. 

Accuracy 

The routine will give a conversion accurate to 35 bits rounded. 

Assembly Instructions 

Although only 250 instructions are assembled, an additional 24- cells (bring- 
ing the total to 274-) must be allowed for temporary storage. 

Programming Instructions 

1. The first time the routine is entered, include the instruction 

i- EF 00000 00A15 (assuming that the routine was assigned to region 

-h 00A00 for assembly). This instruction picks the first card, and is 

co not used except when the read station is empty. Do not include this 

g step if you have previously used the routine and have not emptied the 

<> read hopper. 
r- 

g 2. Enter £hs routine with §n RJ instruction. Assuming that the routine 

was assigned to the region indicated in step 1, use the instruction 
RJ 00A01 00A02. 

3. Enter the parameter worfl . The parameter word should follow the RJ 

instruction and should contain a base address in its rightmost 15 bits; 
the remainder of the word should consist of zeros. This base address 
is added to the relative location numbers from the cards in order to 
find the correct addresses for storing. 
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4.. Cards will be read until the routine encounters a card with a 12 punch 
in column 80. 

5. At the conclusion of the routine, control will be returned to the cell 
immediately following the parameter wordo 



Alarm Conditions 

An alarm will occur t 

1. If the routine encounters a power of ten which has an 
absolute value greater than 40. 

2. 2. If the final scaled form of the number requires more than 
35 bits. 

3. If an attempt is made to load a number into an illegal address* 

In all cases the tag word "CRI-2", along with the address of the cell from 
which the subroutine was entered, will be printed on the flexowriter. 
Starting at this time will cause a fault, due to an attempt to execute 
•tile parameter word. Increasing PAK by one, and then starting, will result 
in re-entering this routine. 
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CO 
l 

O 

o 



X 

a* 










00 A 00 


0013 









00 B 00 


5 1353 









1 B 00 


5 1378 









02B 00 


5 14 23 









3B 00 


5 1467 









04 8 00 


5 1518 


D 






00 COO 


5 1564 


D 






00 EOO 


10 24 









01 EOO 


104 9 


D 






02 E 00 


0109 4 









03E 00 


01138 









04E 00 


1189 









00 F 00 


1274 









OOHOO 


12 35 


D. 






00 MOO 


5 15 54 









00 NOO 


01225 









00 TOO 


000 23 




BOO 


37 


75701 


7 5702 




BO 1 


MJ 


00 000 






80 2 


E F 


00 F 20 


OOE 19 




BO 3 


SP 


00 E 1 


00015 




BO 4 


TU 


A 0000 


OOE 5 




BO 5 


T P 


00000 


OOT 00 




B06 


T P 


00 A 00 


OOT 01 




B07 


T P 


00 H 5 


OOT 04 




B08 


T V 


00 NOO 


O0E24 




B09 


RP 


10016 


OOE 11 




810 


TP 


00 A 00 


OF 




Bl 1 


R J 


00 NO 9 


0N09 




B12 


L Q 


OOTO 3 


0000 6 




813 


QT 


00 A 1 


OOT 5 




Bl 4 


L Q 


00 000 


000 2 




815 


1 1 


00 TO 1 


2 010 4 




816 


A 


00 HO 1 


T 09 




B17 


L 


00 000 


000 17 




B18 


T 


00 HO 2 


OT 8 




819 


1 1 


00 TO 5 


2 010 5 




B20 


L Q 


00 T 2 


0000 6 




821 


Q A 


00 HO 3 


OOT 07 




B22 


L Q 


00 00 


000 17 




B23 


OT 


00 HO 2 


OOT 06 




B24 


M J 


00 000 


IE 00 




180 


RS 


00 TO 4 


00 A 3 




1B0 1 


2 J 


01 E 2 


01E 4 4 




1 B02 


T V 


00 NO 1 


01E 1 5 




1 BO 3 


TP 


00 NO 2 


01E 1 1 




1 BO 4 


T P 


00 NO 3 


01E 07 




1 BO 5 


T P 


00 H 1 8 


OT 2 




1 BO 6 


T P 


00 N04 


A 00 




1B07 


1 1 


00 TO 6 


10002 




1B08 


A 


00 H 1 8 


01E 10 




1809 


E J 


00 N04 


01E 12 




1B1 


MP 


00 TO 4 


OOH 1 5 




IB 11 


A T 


00 F 00 


OOFOO 




1B12 


R A 


01E07 


O0A02 




1B1 3 


RA 


01E 1 1 


OOA 04 




181 4 


1 J 


00T02 


01E06 




1B1 5 


M J 


00 000 


01E 16 




1816 


T P 


00 N05 


01E07 




1817 


R J 


01E1 5 


01E 05 




1B18 


TP 


01E 1 1 


01E 36 




1819 


T V 


00 NO 6 


01E 39 




1820 


T U 


00 NOO 


01E 24 




1821 


TV 


00 NO 3 


01E 27 




1B22 


T P 


OOH 1 8 


OOT 02 




1B23 


T U 


00N03 


01E 28 




1B24 


T P 


00H1 9 


OOTO 3 



8 R 8 



B R B 



BR B 



ALARM EXIT 
NORMAL EXIT 
ENTRANCE 



STORE AODR 

SET COUNTER 

CLEAR 
STORAGE 



STORE WORD 4 
STORE WORD 3 



STORE WORD 2 
STORE WORD 1 



SET COUNTER 



EXTRACT EXP 



STORE 



I J ON 3 



SET COUNTER 
SET COUNTER 



1 5 

6 613 1 

6 6162 

6 6237 

6 6313 

6 6376 

6 6 4 54 

200 

2031 

2106 

2162 

224 5 

2372 

232 3 

6 6 442 

2311 

27 

6 6131 

6 6132 

6 613 3 

6 613 4 

66135 

6 6136 

66137 

6 6 14 

6141 

6 14,2 

6 14 3 

6 14 4 

6145 

6146 

6 147 

6 6 150 

6 6151 

6152 

6153 

615 4 

6155 

6 156 

66157 

6 616 

6 616 1 

6 6 16 2 

6 616 3 

6 616 4 

66165 

6 616 6 

6 6167 

6 6170 

6 6171 

6 6172 

6 617 3 

6 6174 

6 6175 

6 6 176 

66177 

6 6 200 

6 620 1 

6 6 202 

6 6203 

6 6 204 

6 6 205 

6 6 206 

6 6207 

6 6210 

6 6211 

6 6212 



00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
37 
45 
17 
31 
15 
11 
11 
11 
16 
75 
11 
37 
55 
51 
55 
11 
52 
55 
51 
1 1 
55 
52 
55 
51 
45 
23 
47 
16 
11 
11 
11 
11 
11 
52 
4 3 
71 
35 
21 
21 
41 
45 
1 1 
37 
11 
16 
15 
16 
11 
15 
11 



00000 
00000 
00000 
00000 
00000 
000 00 
00000 
00000 
00000 
00000 

ooooo 

00000 

ooooo 
ooooo 
ooooo 
ooooo 
ooooo 

75701 

ooooo 

02 4 16 
020 01 
20 00 

ooooo 

00015 
02 3 30 
02 311 
100 20 
000 15 
02 3 22 
00032 
000 16 
10000 
000 30 
02 3 24 
10000 
02 3 25 
000 34 
00031 
02 326 
10000 
02 325 
OOOOO 
00033 
020 33 
02 3 12 
2 3 13 
02 3 14 
02345 
02315 
000 35 
0234 5 
02315 
000 3 3 
02 372 
02040 
020 4 4 
000 31 
OOOOO 
02 3 16 
020 50 
020 4 4 
02317 
02311 
02314 
02 345 
02314 
02 346 



OOOOO 
OOOOO 
OOOOO 
OOOOO 
OOOOO 
OOOOO 

ooooo 
ooooo 
ooooo 
ooooo 
ooooo 
ooooo 
ooooo 
ooooo 
ooooo 
ooooo 
ooooo 

7 5702 

ooooo 

2 2 3 

17 

2 5 

027 

00 30 

3 3 

2 30 

2 13 

2 3 72 

2 322 

0006 

3 4 

002 

2 104 

0040 

2 1 

00 37 
20 105 

000 6 

36 

00 21 

35 
02031 

20 

2 10 5 

2 50 

2 4 4 

2 4 

0031 

2 
10 002 

2 4 3 

2 045 

2 342 

2 372 

00 17 

0021 

2 37 

2 051 

2 4 

2 3 6 

2 075 

2 10 

2 061 

2 064 
00031 

2 6 5 

00 32 
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IBS 5 


TV 


04E 1 9 


01E 30 


1826 


TP 


00 AOO 


O0T05 


1B27 


L Q 


00 A 3 


10002 


1B28 


OT 


00 T06 


AOOOO 


i B 29 


2 J 


01E 30 


01E 31 


IB 30 


RA 


00 T05 


OOH 04 


1B31 


RA 


01 E30 


A 3 


IB 32 


L 


00 000 


000 1 


1B33 


1 J 


00 TO 3 


IE 28 


1 B 34 


RA 


01 E 28 


OOA 02 


1B35 


MP 


00 T04 


OOT 05 


1B36 


A T 


00F08 


O0F08 


1B37 


RA 


1 E 3 6 


00 A 4 


1B38 


1 J 


00 T02 


01E 24 


IB 39 


M J 


00000 


01E 4 


1 B40 


TU 


00 N 1 


01E 24 


1B41 


RA 


01E 27 


OOHO 5 


1B42 


R J 


01E 3 9 


01E 22 


1B43 


M J 


00 000 


OON 09 


1B44 


RP 


30 00 4 


02E01 


2B0 


TP 


00 TO 6 


OOF 20 


2 8 1 


TP 


O0H18 


OOT02 


2B0 2 


T U 


04E15 


O2E05 


2B0 3 


T V 


04E1 5 


02E 30 


2B04 


T V 


03E07 


2 E 3 4 


2B0 5 


TP 


O0F04 


OOT 3 


2B06 


TV 


O0N07 


2 E 2 1 


2807 


TU 


00 NO 6 


02E 22 


2B08 


T U 


N 7 


02E 2 3 


2B09 


TU 


02E29 


02E 26 


2B10 


TP 


OOTO 3 


AOOOO 


2B1 1 


RP 


20004 


02E 1 3 


2B12 


T J 


OOH 25 


02E 16 


2B1 3 


R J 


00 E24 


O0N09 


2B14 


R J 


00 E 24 


O0N09 


281 S 


M J 


00000 


4E 05 


2B 1 6 


QT 


00 A01 


OOT 4 


2817 


RS 


02E 21 


O0T04 


2818 


LQ 


OOT04 


00015 


2B19 


RS 


02E 22 


O0T04 


2B20 


RA 


2 E 2 3 


OOT 04 


2B21 


RS 


00T03 


OOH 27 


2822 


TP 


O0H32 


OOT 04 


2B2 3 


TP 


00 H 2 1 


OOT05 


2B24 


L Q 


00 T03 


000 15 


282 5 


R A 


02E 26 


OOTO 3 


2B 26 


MP 


00H04 


OOT 04 


2627 


SF 


AO 000 


OOT 01 


2B28 


S J 


2 E 2 9 


02E 30 


2B29 


A T 


00H04 


AOOOO 


2B 30 


T P 


AOOOO 


O0F04 


2B31 


T P 


00 TO 1 


AOOOO 


2B32 


T J 


00H33 


02E 34 


28 33 


S T 


00 AO 5 


AOOOO 


2B34 


A T 


OOTO 5 


OOF 16 


2B35 


R A 


02E0 5 


00 A 2 


2B 36 


R A 


02E30 


OOA 3 


2B37 


RA 


02E 34 


OOA 3 


2B38 


1 J 


00 TO 2 


02E 5 


2B 39 


T U 


03E21 


03E04 


2B40 


TU 


00N02 


03E 05 


2B41 


T U 


03E1 3 


03E 06 


2B42 


T U 


04E15 


03E 07 


2B43 


T U 


OONO 3 


03E08 


3B00 


TV 


04E1 5 


03E 33 


380 1 


TV 


00 NO 2 


03E 35 


3B0 3 


R J 


00 E24 


00 N09 



EX TR TO 



SHIFT E X TR 



STORE 
I J ON 3 



GET RE L A DOR 



SET COUNTER 



GET UEC EXP 



TEST EXP 



TO ALARM 



R UN U 
STORE 

T J ON 37 

STORE 



I J ON 3 



READ 11 ROW 



66213 
6 6214 
6 6215 
6 62 16 
6 6217 
6 6"220 
6622 1 
6 6 222 
6 622 3 
66224 
6 622 5 
6 6 2 2 6 
6 6227 
6 62 30 
66231 
6 6232 
66233 
66234 
66235 
6 6236 
66237 
6 6 2 4 
6 6 2 4 1 
6 624 2 
66243 
66244 
6 6245 
6 6246 
6 6 2 4 7 
6 6250 
6 6251 
6 62 52 
66253 
6 6254 
6 6 2 5 5 
66256 
6 6257 
66260 
66261 
6 6262 
6 626 3 
6 6 2 6 4 
6 6265 
6 626 6 
6 6267 
66270 
66271 
66272 
66273 
6 6274 
66275 
66276 
66277 
66300 
66301 
6 6302 
6 630 3 
6 6304 
6 6305 
6 6306 
66307 
6 6310 
6 6311 
6 6312 
6 6313 
6 6314 



6 6 315 



16 
11 
55 
51 
47 
21 
21 
55 
41 
21 
71 
35 
21 
41 
45 
15 
21 
37 
45 
75 
11 
11 
15 
16 
16 
11 
16 
15 
15 
15 
11 
75 
42 
37 
37 
45 
51 
23 
55 
23 
21 
23 
11 
11 
55 
21 
71 
74 
46 
35 
11 
11 
42 
36 
35 
21 
21 
21 
4 1 
15 
15 
IS 
15 
15 
16 
16 
37 



02270 
000 15 
00020 
000 35 
02067 
00 34 
02067 
10000 
00032 
02 065 
00033 
024 02 
02075 
00031 
00000 
02312 
02064 
02 100 
00000 
30004 
000 35 
023 45 
02264 
02264 
2 171 
02376 
02 320 
2 317 
02 3 20 
02143 
00032 
20004 
02354 
02030 
020 30 
00000 
00016 
02133 
00033 
02134 
02135 
00032 
02363 
02350 
00032 
2 14 
02327 
20000 
02143 
02 3 27 
20000 
000 30 
02 364 
00022 
00034 
02113 
02144 
02 150 
00031 
2 2 7 
02313 
02177 
02 264 
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02264 
02 313 
02030 
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02101 
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02330 
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02322 
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024 16 
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02113 
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02150 
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0213 3 
213 4 
2 13 5 
02 140 
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0212 3 
2 12 6 
02322 
02322 
02252 
00033 
00033 
00017 
0033 
00033 
02356 
3 3 
3 4 
0017 
00 32 
0033 
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02 144 
20000 
02376 
20 000 
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20000 
024 12 
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0020 
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2166 
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2 172 
2 223 
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02 322 
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Identification Tags 

Type? 

Special Storages 

Service Entrances 
Program Entrances 
Program Exit: 
Alarm Exit: 
Machine Timet 



MDP-0 ' 

Service Routine (with subroutine entrance) 

The constant pool and temporary storage 
pool are not used by this routine*. 

Address 40004.b 

40004-b 
40020b 
The alarm exit is not used by this routine 

Approximately 27 sec/lOO words on 

paper tape 
Approximately 2o7 min/lOO words on 

typewriter 



CO 

i 

co 



o 



X 

Oh 



Coded by: 
Code Checked byi 
Machine Checked by: 
Revised by: 
Approved by: 



Ro Beach 
R Beach 
Ro Beach 
Co Koos 
Wo F, Bauer 



October 27, 1955 

October 27, 1955 

October 28, 1955 

December 1, 1955 

December 9» 1955 



8-40 



RW-73 



MDP-0 

Pg. 2 of 2 

Revised 12-9-55 



Dejaorieiioja 

This routine dumps, in octal, the contents of consecutive storage cells onto 
paper tape, in flexowriter code, or onto the directly connected flexowriter. 
It stores ES, A and Q and bootstraps itself into ES.for execution. ES, A 
and Q are restored at the conclusion of a dump. 

The address is printed for the first word of the dump, and for each subsequent 
word whose address is zero, modulo eight. An extra carriage return is included 
in order to provide double spacing at the end of each block of eight words. 
If a cell contains zero* only the first digit is printed. However, if the 
address is to be printed then all twelve zeros are printed. 

The flexowriter should be in a shift down state, as the numbers are then 
larger, and hence more legible. 

This routine makes use of MDP-1 for part of its operation, and both routines 
must therefore be present on the drum., 

QpfiEaJJLn&.Ingtrttctions 

1* When routi ne, is used as a service routine start at 40004b. Machine halts 
on an MS stop with Q clear. 

Insert the parameter word in Q (see below) and start. Machine executes 
dump and halts on 56 00000 40004b. 

2. When routine is usefl as a subroutine enter with 37 40020 40004b followed 
by the parameter word (see below). At the conclusion of the dump, control 
will be transferred to the cell following that one in which the parameter 
word is located. 

3. The parameter word has the form 

AB uuuuu vww 

where uuuuu and wwv are the first and last words to be dumped respecti- 
vely. For a typewriter dump the octal digits A and B must both be zero 
while for a paper tape dump B is to be different from zero. 

To restore ES 9 A and Q at any time after the parameter word has been 
given, set PAK to 40040b and start. 
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Identification Tags 
Types 



MDP-1 

Service Routine (with subroutine entrance) 



Special Storages 
Service Entrances! 



The constant pool and temporary storage 
pool are not used by this routine « 

Bioctal Tapes 40005b 
Binary Cards § 400l6b 



Program Entrances 

Program Exits 
Alarm Exits 



Bioctal Tapes 
Binary Cards! 

40020b 



40005b 
40016b 



The alarm exit is not used by this routine, 





Coded bys 


Ro Beach 
C Koos 


October 25, 1955 


o 


Code checked bys 


Ro Beach 


October 28, 1955 


o 

CO 

1 


Machine Checked bys 


Ro Beach 


October 28, 1955 


o 
o 
cr- 

r-4 


Revised bys 


C o Koos 


December 1, 1955 


X 

a, 


Approved bys 


Wo F Bauer 


December 9, 1955 
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This routine dumps 9 in binary 9 the contents of consecutive storage 
cells onto paper tape or cards" for later read in by FRI-0 or CRI-1. 
The routine stores ESj, A and Q and bootstraps itself into ES for 
execution. At its conclusion, it restores ES, A and Qo The type of 
dump is determined by the entrance used, and the range of- the dump is 
given by a parameter word. 

2. Binary Ta pe 

Binary (or bi-octal) tape is punched as specified by the parameter word. 
The routine punches leader, insert and check addresses, check sums, stop 
' code for FRI-0 and a trailer . The leader and initial seventh level punch 
may be suppressed if desired, as may, also, the stop code and trailer . 
A check sum will be punched for each dump. If a dump of more than 808 
words is specified, the routine treats this problem as more than one 
dump and executes as many separate dumps as there are multiples of 808. 

3. Binar y Cards 

Because the Bull Reproducer is limited to 160 punches per card, with no 
more than 60 punches in any one row, binary cards are dumped in groups 
of three cards for later merging on off-line equipment into one cardo 
Each card contains up to eight words o 

Row 9 Address of first word in group (Colo 1-15) 
Number of words in the group of 

three cards (Col. 17 - 21 ) 

Sum of all words in the group 
of three cards (Col. 32 - 72) 

Row 8 First word (field one) (Col. 1-36) 

Second word (field two) (Colo 37 - 72) 

j- Row 6, 7 Contains 4- more words as in Row 8o 
d In addition, Row 7 has a punch in 

i column 80 to identify it as the first 

> card in the group . 



u 



< Card No.. 2% Contains up to 8 words in rows five, four, 

three and two with a punch in row eleven, 
columns 80 and 75, to identify it as the 
second card*. 

Q&X&JkuJl* Contains up to 8 words in the remaining four 
rows and an identification punch in row 
eleven, column 80 • 

If a stop code is specified, a punch is placed in row twelve, column 80 of 
the second card of the last group of three cards dumped. The dump is accom- 
plished at full card punch speed. n .. 

0-4% 



RW-90 

MDP-1 

Pgo 3 of 3 

revised 12-9-55 

To keep the number of punches at a minimum, the number of binary ones in each 
word is counted, and the word is complemented if this number exceeds eighteen. 
In this event a punch is placed in column 78 of that row, for field one, and 
in column 79, for field two, indicating this complementation., 

The output of the dump may now be processed by the IBM equipment on an off- 
line basis o Each group of three cards is merged into one binary card contain- 
ing up to twenty- two words of information o This merging may be accomplished 
by two passes on the sorter followed by two passes on the reproducer, or by 
one pass on the reproducer (gang punch operation), followed by one pass on 
the sorter p 

Qp^raMagU^asiEusiions 
I a Binary Tape 

a. Service Routine 

1. Start at 4-0005b<» Computer halts on an MS order* 

2. Insert parameter word (see below) in Q and start 

3o At conclusion of dump, computer will halt on 56 00000 4-0005b 

h« Su broutine . . 

1, Enter with 37 4-0020 4.0005b followed by parameter word 

(see below) 
2o At and end of dump, control is transferred to the cell 
following the one containing the parameter wordo 

II o Binary Gards 

a» Service Routine 

lo Start at 4.0016b « Computer halts on an MS order. 
2* Insert parameter word (see below) in Q and start. 

3. At conclusion of dump, computer halts on 56 00000 4.00l6b« 

b« Subroutine 

lo Enter with 37 4-0020 4.0016b followed by parameter word 

(see below) 
2o At conclusion of dump, control is transferred to the 
cell following the one containing the parameter wordo 

IIIo Parameter Word 

§ The parameter uord is 

CO 

<i AB miumi vww 

o 

a* 

£ where uuuuu an;' vww are the first and last words to be dumped respec- 

x tively* . The second octal digit, B, specifies a stop code if non-zeros 

^ no stop code it zero. 

For binary tap* dumps, setting the first octal digit, A, of the para- 
meter word dif isrent from zero suppresses a leader and initial seventh 
level punch o 

IV o Restore 

At any time diiing a dump, ES, A and Q mav be restored bv start-im? nt 
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Identification Tag: 

Type J 

Special Storage i 

Service Entrances 
Program Entrance: 
Program Exits 
Alarm Exits 

Machine Times 



MDP-2 

Service routine (with subroutine entrance) 

The constant and temporary storage pools are 
not used by this routine. 

Address 4.0015b 
Address 4-0015b 
Address 4.0020b 
The alarm exit is not used by this routine. 



2.7 seconds plus 0.5 seconds per card maximum 
machine time. 



Coded byx 

Machine Checked by i 
Revised bys 
Approved bys 



C . Koos 

C* Koos 

C. Koos 

W. F. Bauer 



July 21, 1955 
August 5, 1955 
December 1 9 1955 
December 9» 1955 
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This routine will dump the contents of a group of consecutive (either ES or 
KD) storage cells onto cards. Each card will contain (in octal) four conse- 
cutive words and the address of the cell containing the first word on the 
card* The following card columns are useds 

Columns 1 thru 5 Address of the first word 

Columns 13 thru 24- First word 

Columns 25 thru 36 Second word 

Columns 37 thru 4.8 Third word 

Columns 4.9 thru 60 Fourth word 

Any card for which all four words are equal to zero is omitted and the next 
card produced carries a punch in the 12 row of column 9* The first and last 
cards of every dump will be produced even if they contain all zeros and the 
last card will carry a punch in the 12 row of column 10o In addition, each 
card contains an identifying 12 punch in column 8o 

This routine bootstraps itself into ES to operate and at its conclusion 
restores the machine to its original state o 

Operating Instruc tions (to be followed when the routine is used as a service 
routine ) 

1. PjiJLih^ejair&ui^^ (this step is unnecessary 
for a dump of all ES only)* 

2. Set PAK to AOOlSb and start* 

3. Computation wjj.1 halt with an MSO instruction and Q will contain all 
zero So 

4-° Manually insert the parameter word into Q» 

a, a parameter word of all zeros will dump ES 

b e in all other cases, place the first address in Q and the last 

address in Q 
v 

o Co the range of the dump may not extend from ES to drum addresses 

i— i 
i 

CO 

i 5* The machine will ha j,t with an MSO instruction when the dump is com- 
o pleted and the machine has been restored to its original state, 

i— • 

x 6. If ..another dump is required,, it is necessary only to press the start 
a. button again to return to stop 3 above o 

7. If.^tl^.-QDeia tor .wishes to stop a dump at any time after step 3 above, 
he needs only to make a forced stop, master clear, and MD start with 
PAK set to 4.004-Ob „ The machine will then be restored to its original 
state and computation will halt with the same MSO instruction mentioned 
in step 5. This same procedure is applicable if an SCC fault occurs 
after entering an illegal parameter word in Q. 

8-46 



IiW-100 

MDP-2 

Pg. 3 of 3 

revised 12-9-55 



Programming Instructions (to be followed when the routine is used as a sub- 
routine ) 

1* Enter the routine with an RJ instruction 

Use the instruction 37 4.0020 4.0015b. The word in your program 
immediately following the RJ instruction must contain the parameter 
word (as described in step U of "Operating Instructions" above). 
If the RJ instruction is given at address n the parameter word 
will be at address n + 1 and at the conclusion of the dump control 
will be returned to the instruction address n + 2. 
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Identification Ta^ 

Types 

Special Storages 

Service Entrances 
Program Entrance? 
Program Exit; 
Alarm Exits 
Machine Times 



MDP-3 

Service Toutine (with subroutine entrance) 

The constant pool and temporary storage pool 
are not used by this routine. 

Address 40037b 

4.0037b 

40020b 

The alarm exit is not used by this routine • 

(l4.ol + o5n) seconds where n=number of cards 
punchedo 



8 



1 

CO 



o 






Coded bys 
Code Checked bys 
Machine Checked hj% 
Revised by 2 
Approved by 2 



R« Beach 
Ro Beach 
R Beach 
Co Koos 
Wo F„ Bauer 



October 26, 1955 
October 26, 1955 
October 26, 1955 
December 1 9 1955 
December 9> 1955 
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This routine compares ES with the MD image of ES and prints out those 
words of ES which are not the same as their correspondent in the image o 
ES is not altered by the routine, and the MD image is up-dated to be 
identical with ES when exit is made from the routine . 

The routine stores ES at addresses 66000b to 67777b and reads portions 
of this image and the regular image (76000b - 77777b) into ES and com- 
pares words o 

If the corresponding words are the same, they are replaced by zero, unless 
the new value is zero a In the latter case the word is replaced by 45 4-0037 
4.0020b o The changed words and zeros are then read into ES e ES is then 
dumped on the line printer „ (Note 8 Until the line printer is in use, 
this dump will be made onto cards by employing MDP~2)» ES and the 76000b 
image are then restored from the 66000b image o 

Each card contains four words o If any one word is zero, it should be ig- 
nored as it is not a changed wordo A word which has been changed to zero 
has been given the arbitrary tag 4-5 4-0037 4-0020b and will be punched as 
such* Also, a word that was changed to this tag will be identified in the 
same manner o The programmer must therefore distinguish between these 
two cases o 



Operating_Instructions 

1» When rou tine is used as a service routine set PAK to 4,0037b « 
Routine will find changed words, print them out, and stop 
on 56 00000 40037b. 

2« When routine is used as a subroutine enter routine with 37 40020 
40037b o Operation of routine is the same except that routine 
exits to address y+1 if y is the address of the RJ instruction 
used to enter the routine <» 

3o Most service routines use all or parts of ES and their activation 

will destroy the old 76000b image Hence, if a changed word compari- 
son is desired, the execution of MDP-3 must precede the use of other 
post-mortem routines * 



AIarjQi_ConMtiong 

There are no alarm conditions in this routine However, if the routine 
hangs up during punching, or if the machine is halted during punching, 
a start at 40040b will clear the punch, restore ES, and up-date the 
76000b image o 
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THE RAMO-WOOLDRIDGE CORPORATION 
Los Angeles 45, California 



STORAGE TO MAGNETIC TAPE TRANSFER ROUTINE (re vi sed) 



Specifications 



Identification Tag: 
Typet 

Special Storage t 

Service Entranoe t 
Program Entrance J 
Program Exits 
Alarm Exitt 



STT-0 

Service routine (with a program entry 
available) 

The constant and temporary storage pools 
are not used by this routine 

Address 4.0006b 

Address 40006b 

Address 40020b 

The alarm exit is not used by this routine 



Machine Timet 



5«6 seconds for transfer of (IS) 



CM 

O 
1 

co 



o 
o 



X 



Coded by* 
Code Checked byt 
Machine Checked byt 
Revised byt 
Approved byt 



R# Beach 
C Kocs 
C • Koos 
C, Koos 
W, F, Bauer 



May 11, 1955 
August U» 1955 
August 20, 1955 
December 1, 1955 
December 9, 1955 
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This routine transfers information from the internal computer memory to magne- 
tic tape where it will be stored until read back in again by TST-O. 

A parameter word is used to specify 

1. The location of data to be stored 

2. The MT unti to be used for storage 

3. Whether or not MT is to be rewound to its original position after storage 

4.. The address to which control is to be transferred when the data is read 
back by TST-O, 

When using STT-0 as a subroutine the parameter word follows the RJ instruc- 
tion used to enter the routine. When using STT-0 as a service routine the 
parameter word is manually entered in Q when the computer halts (after being 
started at the service entrance)* 

At the time, of entry the, routine, stores (ES) on the drum, bootstraps, itself 
into ES, stores (A) and (Q) and obtains the parameter word. At the conclu- 
sion the routine restores (ES), (A) and (Q) and transfers control to the 
exit instruction. 

The routine stores one block of information in addition to the number of 
blocks necessary for storing the data, as follows: 

1. The first half of the first block contains (Q), (A), the parameter word 
and twelve zero words. 

2. The second half of the first block thru the first half of the last block 
inclusive contain the information to be stored, 

3. The last half of the last block contains the sum of the data (that is, 
the double precision sum of the split extension of each word), the 
number of blocks transferred to tape, the starting and stopping address- 
es for the transfer, and eleven zero words. 



This parameter word is of the form BC DEEFF GGGGG, where B, C, D, E, F, and 
G are all octal digits. 

B. The octal digit B determines whether (ES) is to be stored on MT. If 
B = 0, (ES) will be stored*, if B ^ Oj (ES) will not be stored. 

C. The octal digit C determines whether MT is to be rewound to its original 
position after the data has been transferred. If C = the rewind will 
be executed, if C ^ it will not be. 

D. The octal digit D determines the MT unit on which the data is to be 
stored. MT units are specified by the same digits used in the standard 
1103 MT commands. 
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E. The two octal digit number EE specifies the address of the first word 
to be transferred from internal storage to tape. This number is the 
integer part of the first address divided by g^. That is, (EE)(512) 
is the address of the first cell to be transferred* 

F. The two octal digit number FF specifies the address of the last word to 
be transferred. As in E above this number must also be a multiple of 
512, (FF)(512) is the address of the last word to be transferred. 

G. The V-address portion of the parameter word (GGGGG) specifies the address 
to which PAK is to be set when the transferred information is read back 
to internal memory by TST-O. 

As an example consider the parameter word 01 2^24.6 00017b. This specifies a 
transfer of (ES) and the contents of cells 42000b thru 4.5777b with no rewind- 
ing after the transfer. PAK will be set to 00017b by TST-0 when the routine 
is read back to internal memory. 

Operating' Instructions (to be followed when the routine is used as a service 
routine ) 

1. Set PAK to A0006b and start . 

2. Computation halts with an MS instruction. 

3. Enter the parameter word in Q and start . 

4-* Computation halts when the transfer is completed, setting PAK to the 
address specified in the parameter word. 

Programming Instructions (to be followed when the routine is to be used as 

a subroutine) 

/ 

1. Enter the routine with the RJ instruction 37 Z.0020 AOOOob . If the RJ 
instruction is stored at address n the parameter word should be in 
address n + 1 and at its conclusion the routine will transfer control 
to the instruction in address n + 2. 

Restore 

co To restore (ES), (A), and (Q) at any time before normal completion set PAK 

d> to 4.004.0b and start. 

r- The magnetic tape will be rewound at this time if the parameter word speci- 

x fies a rewind, 

a* 
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THE RAMO-WOOLDRIDGE CORPORATION 
Los Angeles 4-5 » California 

Magnetic Tape „%Q Storage Transfer RpuftXne (revised) 
Specifications 



Identification Taj 

Type: 

Special Storage: 

Service Entrances 
Program Entrance: 
Program Exit: 
Alarm Exit: 
Machine Time: 



TST-0 

Service routine (with a program entry available) 

The constant and temporary storage pools are not 
used by this routine 



Address 40007b 

Address 40007b 

Address 40020b 

The alarm exit is used by this routine 

5i6 seconds for transfer of (ES) 



Coded by: 
Code Checked by: 
Machine Checked by: 
Revised by: 
Approved by: 



R« Beach 
Co Koos 
0, Koos 
C « Koos 
W„ Fo Bauer 



May 11, 1955 
August 13, 1955 
August 21, 1955 
December 1, 1955 
December 9, 1955 
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This routine has been designed to read back into the internal computer 
memory the information transferred to MT by STT«=0o A parameter word is 
used to tell the routine which MT contains the information to be trans- 
ferred and the address to which PAK is to be set after the routine -has 
finished operating o 

When- used as a subroutine, the parameter word follows the RJ instruction 
transferring control to TST-Oo When used as a service routine the parameter 
word is entered in the Q register before activating the routine* 

The routine stores (ES) on the drum 9 bootstraps' itself into ES and reads in 
one block from magnetic tape<> It examines the parameter word used by STT-0 
and loads the specified portions of memory while computing the sum as the data 
is, transferred » The sum is checked against the sum placed on MT by STT-0 <■ 

If the sum is correct^ the parameter word is consulted to determine the 
address to which PAK is to be set and the proper address is placed in the 
exit instruct ion o The parameter word from STT-0 is checked to determine 
whether or not the MT is to be rewound after the transfer and a rewind 
command given if rewind was specified when STT-0 was used to store the data 
(A) and (Q) are then set from values stored on MT f (ES) is restored, and 
control is transferred to the exit instruction . 

The form of the parameter word is OX Y0000 ZZZZZ, where X, Y, and Z are 
octal digits* 

X. The octal digit X determines the cell to which control will be trans- 
ferred to at the conclusion of the routine . 

If X = control will be transferred to the address specified in the 
parameter word used for STT-0 when the data was transferred to magne- 
tic tape. If X ^ control will be transferred to ZZZZZ . 

Yo The octal digit Y determines which MT unit will be selected. MT units 
are specified by the same digits used in the standard 1103 MT commands* 

z » The V-address of the parameter word (ZZZZZ) specifies the address to 
<^ which control will be transferred at the conclusion of the routine 

°P (see X above )e 

o 

£ Operating. . Instruc tions (to be followed when TST-0 is used as a service 

^ routine ) 



1°. !toa llY e n_ler J&Q_jaar_smfi£fiE- wo rd, in Q o 
2* Set PAK to AQOOTb and start. 

3° Computation will hajt after a successful transfer with PAK set as 
specified (see "Parameter Word" above) o 
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Programming Instructions 

1« Use the RJ i nstruction 37 40020 40007b to enter TST-0. The cell immedia- 
tely following the RJ instruction must contain the parameter word„ 

2o After successful transfer control will be transferred to the cell speci- 
fied by the parameter wordo 

Alarm Conditions 

If the sum test fails ALR-1 is entered and "TST-0 XXXXX" is printed on the 
flexowritero The address is insignificant* 

Starring after the alarm halt causes a rewind of the tape and another transfer 
of the same data from MT« 

Restore 

If, at any time during its operation, TST-0 is interrupted (or after an alarm 
print), PAK set to 4-0O40b and the machine started, the routine will 

1. Rewind MT (if this had been specified) 

2. Restore (ES). (A) tt and (Q.) 

3. Transfer control to the TST-0 exit instruction . 
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THE RAMO-WOOLDRIDGE CORPORATION 
Los Angeles 4-5 » California 



Binary Card Read- In Routine (revised) 



Specifications 



Identification Tag: 

Type: 

Special Storage: 

Service Entrance: 
Program Entrance: 
Program Exit: 
Alarm Exit: 



CRI-1 

Service Routine (with subroutine entrance) 

The constant pool and temporary storage 
pool are not used by this routine 

40017b 

40017b 

40020b 

The alarm exit is used by this routine 



CO 

o 



i 

00 



o 
o 



X 

a. 



Coded by: 
Code Checked by: 
Machine Checked by: 
Revised by: 
Approved by: 



R. Beach 
Re Beach 
R e Beach 
C, Koos 
W, F. Bauer 



October 26, 1955 

October 26, 1955 

October 26, 1955 

Deo ember 1, 1955 

December 9» 1955 
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D escr iptio n 

This input routine reads binary punched cards produced by the binary card 
dump (MDP-1 'revised) at full card reader speed. Once activated it continues 
to read cards, ignoring blank cards, until it has read a card containing 
a 12 punch in column 80, The routine loads the memory as directed by the 
address appearing on the card, and checks the sum of the data read in against 
the sum stored on the card, for each card. 

The routine stores ES and bootstraps itself into ES for execution. After 
execution, it restores ES, 

Operating instructions 

1. When routine is used as a service routine set PAK to 4.0017b and start. 

2. When routine is used as a subroutine f enter routine with 37 4.0020 4.0017b 

3. Qarfl p Q S J L tl Q- n jng 

A card must be positioned on the read side of the Bull or a "no informa- 
tion" fault will occur on the first cycle. The fault, however, positions 
the 'card so one may simply start at 00103b. 

4., To restore ES at any time, start at 4004.0b. This start may also be used 
to end a read in for which the 12 punch in column 80 of the last card was 
'omitted. 

Algim.flpnflltiona 

If the sum of data read in fails to check against the sum appearing on the 
card, ALR-1 is activated to print. 

alarm 00102 000000000000 1100123vww xxxxxxxxxxxx 

where wwv is the address on the card. Q is not significant. 

Starting ignores the alarm. 
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THE RAMO-WOOLDRIDGE CORPORATION 
Los Angeles 4.5, California 



The Ferranti Input Routine (revised) 



Spec if icating 



Identification Tag: 

Type: 

Special Storage: 



FRI-0 

Service routine (with subroutine entrance) 

The constant and temporary storage pools 
are not used by this routine 



Service Entrance: 
Program Entrance: 
Program Exit: 
Alarm Exit: 



Address 40001b 
Address 40001b 
Address 40020b 
The alarm exit is used by this routine 



CO 

NO 

i 

co 



o 



a. 



Coded by: 
Code Checked by: 
Machine Checked by: 
Revised by: 
Approved by: 



R. Beach 
R. Summers 
R. Beach 
C. Koos 
W, Bauer 



May 18, 1955 
May 19, 1955 
August 4» 1955 
December 1, 1955 
December 9, 1955 
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Description 
I. General 

This routine is designed to read, by means of the Ferranti reader, seven-level 
bioctal tape prepared as described below. The routine reads in paper tape at 
the full speed of the Ferranti with only short hesitation when a check or 
insert address is encountered „ 

If desired, the tape may contain a check sum to be tested for agreement with the 
computed sum of the data read- in. The routine will read data into any ES or MD 
cell although the reading of information into certain drum cells (as described 
in detail below) will result in abnormal operation. 

The routine stores the contents of ES on KD at addresses 76000b through 77777b 
and then transfers itself .to ES It sums itself (in ES) and checks the sum 
against the correct sum (stored on MD). 

The Ferranti reader is started in the free running mode and the routine proceeds 
to read tape and process the information contained on the tape in the same manner 
as does the ERA photoelectric reader (for exceptions, see II. 3 and /*) . 

Each word to be transferred to memory is summed es it is road in from tape. 
Words which are to be read into ES are first stored in the KD image of ES 
(76000b thru 77777b). 

During operation all words are read into ES from the tape and a block transfer 
to MD is made when (l) ES has been filled with data (that is, when 924 words have 
been read in)j (2) an insert address appears on the tape; or (3) the "end of tape" 
seven-level combination has been read in (see II. 4-) • 

The reader is stopped before making the transfer and is started again after the 
transfer has been completed in the first two cases," In the last case, the reader 
is stopped, ES is restored from the KD image and control is transferred to the 
exit . 

The reader Is also halted when a check address appears on the tape. If no check 
sum test (see II. 3) is to be made after a successful check address test the 
reader Is started immediately? if the check sum test is specified the reader is 
started after the test is made and the sum determined to toe correct. 



*» The routine does not prevent read in to addresses 76000b thru 77777b nor to 
§ those calls used by the routine for its own operations. 



1. The first word on a tape must be an insert address. 

2. Check addresses should be used, although FRI-0 will operate without 
them. A check address Immediately following an insert address must 
be the same as the insert address <> 
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3. For a check sum test the following four words must appear on the tape 
at the point where the sum is to be tested t 

a» Insert address 75202b 

b« High order 36 bits of check sum 

Co Low order 36 bits of check sum 

do Check address 75204b 

O perating Instructions (to be followed when the routine is used as a service 
routine) 

1 . Set PA K to 40001 b and start « 

2. Computation will halt with the KS instruction 56 00000 4.0001b at the com- 
pletion of the read in. 

Programming Instructions (to be followed when the routine is used as a sub- 
routine) 

1. Enter tfre r wt ine wjLt hJ&fl .RJ instruction, 37 4QQ2Q 4QQCttb 

2. Control is returned to the cell Immediately ..following the RJ instruct ion 
as soon as an "end of block" punch is reached on the tape. 

Alarm QondiUons 

1. No "end o f tape" punch. This condition is indicated bby the tape running 
completely out of the Ferranti reader. When such a condition occurs the 
operator should, 

a • Master clear 

b. s e t, pak to QQCTO and, a t a rt 

c« When computation h^ilts (when a service entry was -used) with the KS 
instruction 56 00000 40002b the machine will be returned to its 
^5 original state and the data read from the tape wip.1 be properly 

co stored. 

6 

& If a program entry was used control will be transferred to the proper 

r- cell in the main program „ 

*&& 

A 2. FRI-Q not transferred to ES correctly . If ALR-1 prints "FRI-0 xxxxx and 

(A) and (Q), the sum of the program transferred to ES has failed to check. 

Starting at this point transfers FRI-0 to ES again. 

A second failure indicates that FRI-0 is not on the drum correctly and 
should be restored. 

3. Qfreck, egress .failure. If ALR-1 prints "ALAR C" and (A) and (Q), a check 
address has failed. In the alarm print (A R ) is the address of the next 
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cell to be loaded and (Q) is the check address that was read in from 
paper tape. 

Starting at this time will cause the machine to ignore the failure and 
operation will continue normally. 

U* Check su m failure o If ALR-1 prints "ALARM" and (A) and (Q), the check 
sum on the tape has failed to agree with the computed sum. The computed 
sum is in A at the time the alarm print occurs . 

Starting at this point will cause the routine to ignore the failure end 
to begin to read in the tape again » 

If at any time (ES) need to be restored from its image, starting at 
4.004.0b will transfer the image to ES and transfer control to the FRI-0 
exit . 

5# And "end of tape" (or "end of block") punch must be present on the tape 
to halt read in. This consists of seventh level punches in two consecu- 
tive frames on the tape at the point where the read in is to be stopped. 
This seventh level combination acts as a signal to FRI-0 to restore (ES) 
and stop the Ferranti reader. It is compatible with the ERA photoelectric 
reader in that it is an illegal combination which halts the ERA reader o 
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Preface to Revised Report 

Flip III ia faster than Flip 1. Several restrictions 
in Flip I which were discovered over a period of time were 
removed. These oocurred in Commands L\0 # k2» hh and 51 • 
Division by zero ^causes an alarm halt in Flip III, but 
division by an unnormalisied number may still cause a computer 
fault as in Flip I. 

The magnetic tape readin has been changed in two respects* 
The sum check print is now "FLIP OK". If the 1103 is restarted 
at this point the entire memory except that part already sum 
checked is cleared to eero and "clear" is printed out. Except 
when other information is already in the memory, this step 
should always be included. 

A new method of loading or "ACTIVATING" Flip is avail- 
able in Flip III. 

A great deal of this report has been completely rewritten to 
render it more comprehensible on first reading* Many members of 
the Digital Computing Laboratory have assisted in this. All 
coding has been relegated to Part II of this report which will 
be Issued shortly* 

Flip is the result of suggestions, coding and checking by 
so many individuals that It is unfortunately impossible to give 
■pecifio credits for the various contributions* 
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FLIP III 



DESCRIPTION 



Flip III is an interpretive system for the \llOg. And 1103A, useful 

I 

for a large class of problems. Using the Interpjret 'command, the machine 
commands are augmented by 58 "pseudo commands'* whioK can be used as though 

they were regular machine commands. These enable the Inclusion of floating 

' - ■ i . \ 
point arithmetic, complex arithmetic, and special ^Unctions which include an 

!'• ■ ! ; '• 

integration step for differential equations. • Also icejrtain. features, such 
as index registers and tracing (to be described 1 in 'detail later), are 

1 » ,» ; ; ' 

built into these pseudo commands* Conversions to and j from 'floating point 

i 5 j 

representation enable the programmer to use the convenience of the Flip 
input and output while doing the "core" of tjhe problem in fixed point for 

' : i ■ 

speed. 1 

; I i 

Since this system augments the basic commands, knowledge of most 

' ! 
of them is necessary* I I 

' ' i ' 

The speed of operation ranges from 5.<j[ milliseconds f<j»r a floating 

I : ' I ! 

point multiplication to U#3 milliseconds for floating fc>oint addition. 

Transcendental functions compare closely to fixed poinjb operations in 

regards to timing. ; 

II NUMBER REPRESENTATION ! j- 

All input and output occurs in a floating, point decimal form. However, 

coders probably should know the internal representation* \ 4et a number N be 



given by N a {.^ • j^|g|< 1 j -n?*?**^ i ' 
The number q oocupies the first 28 bits of the! cell and 'the ^number p the 
last eight, each beginning with a sign bit* Negative q«s and ©«s are 
represented by complements. Zero is represented by a true machine tero. 
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An unnormalised two cell representation occurs In the "floating 
to fixed" and "fixed to floating" commands. Detailed description of 
it occur 8 under those commands* 
111 COMMAND STRUCTURES t 

A. One address commands, octal formt (Commands 55* 5&» 57) * 

1 > Interpret command code 

C ") 

- y Pseudo command code 

« Command Parameter 
jj f Command Counter 



M 

v 



Regular machine address, not to be index modified 



B. Two address Commands, octal form. (All other commands) 

1 > Interpret command code 

C "K 

q y Pseudo command code * 



I 



X 

x V Index counter tags and first address, x. 

Y > Index counter tags and second address, y. 
Tj 

The first octal digit of these addresses consists of three Binary 
biti# The first of these bits, if a one, causes the first index counter, 
b |f to be added to the address during command execution^ . (Not in its 
memory position). The second bit does likewise with the second index 



♦RESTRICTION! See page 56-2. 
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counter, b. « Both bits may bo one, in which case both counters are 
added, / 

Since there are only ten remaining address bits, only 102b cells can 
be directly addressed. If. however, b,»1 ; and b** 1 , all cells in the H 096 
llOJA high speed store may be properly addressed, b, occupplos cell 
01776 and h^ occuppies cell 01777 , 

IV REGISTERS 

Flip commands refer only to the right 36 bits of the accumulator, 
the other bits of A and all of Q being lost* These 36 bits form a register 
called R which is restored by all Flip index or threshold Jump commando. 
If R is to be used as an operand, it may be addressed, using 177^ as the 
address, instead of 20000 as used in regular machine commands* 

V COMMAND LIST 

A* Floating Point Arithmetic Commands* 

The two octal digits of these commands perform separate 
functions, Recogniting this fact will facilitate learning them, 

(FLIP) 
Code Symbolic Operation Name 

00 y+ x -* y, R Replace Add 

°1 R * x -* y, R Add and transmit 

02 y *- x -* R Add 

°3 R+y+x-fR Accumulate Add 

0]+ y • x — > y, R Replace subtract 

°5 R - x -> y, R Subtract and transmit 

06 y - x «* R Subtract 

07 R •*» y • x -* R Accumulate add and subtract 
10 y +• R • x -> y, R Replace add a produot 
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11 



:} 



15 
16 

17 
20 
21 
22 
23 

2k 
25 
26 

.27 
3^ 
31 
32 
33 
* 
35 
36 
37 



} 



(l +X ) • R -* y, I 

y+R • x — f R 

y - R ♦ x -> y f R 
(1 - x) • R -» y, R 

y « R • x -> R 



\ 



B. Other 




Inorement and Multiply 
Positive Polynomial 



! 1 



Replace add a negative product/ 

Decrement and Negative Multiply, \ 

\ 

Alternating Polynomial 

Replace multiply 

Multiply and Transmit 

Multiply 

Accumulate Multiply 

Negative replace Multiply 

Negative multiply and transmit 

Negative Multiply 

Accumulate negative Multiply s 

Replace Divide > 

Divide anda transmit 

Divide 

Accumulate Divide 

Negative replace Divide 

Negative Divide and transmit 

Negative Divide 

Accumulate negative divide 



This; list is designed for quick reference. For detailed 



descriptions of most of these commands see subsequent pages. Some of 
these commands, normally operated in high speed storage, are not 



'\ 



" y 
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needed in many programs * 


These are not 


included in high speed storage 


unless specified and then 


require extra 


storage* See sect! on(VJl)for 


details of assigning storage • 




COMMAND 
CODE 


EXTRA CELLS 
(DECIMAL) 


DESCRIPTION 


Uo 


NONE 


'-.■■■ / 
\ Index jump, counter bj • 


la 


NONE 


Jump if |(x)|>((R)| 


hz 


NONE 


N (x,y)-tR 


fc5. 


57 


Flexo writer input conversion 




NONE 


Index jump, counter b a « 


; ^5 


NONE 


Jump if |(x)|<((R)| 


\ : ,; U6 


31 


Integrate Differential equations 


; hi 




Not used 


5 o 


17 


-V**y 


51 


NONE 


R*N (x,y) 


52 


56 


Typewriter output 


! 53 


2 1-56* 


Paper tape data output 


> r5U 


31 


L °Se x ->y 


) 55 


NONE 


Charactron output 


' 56 


NONE 


punched card output 


; 57 


NONE 


punched card input 


V 60 


1*9 


sin x-*y 


! 6l 


2+i±9* 


cos x-^y 


6e 


1*5 


tan x-^y 


63 


2*i*5* 


cot H x->y 


' 61* 


NONE 


Jo (x)*y 


65 


NONE 


Jo (*)?yi Yo (x)->00037 
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66 

n 

n 
72 

0- 
1k 

T5 
76 

77 



27 




26 



J,(x)->y 




J,(x)-*y 


1 y,(x) -^00037 


e x -*y 




Hot used 




Y+X-*S "J 




Y~X*S / 


>Co*vpl«* AvitWmi 


Y*X*S | 




Y*X-*S J 




Not used 




Trace (Magnetic tape version) 



♦For these commands see restrictions under detailed descriptions that follow. 
VI STORAGE 

USB 



} 



TEMPORARY STORAGE 



/ 



ROUTINE 



CELLS 
00002 to C037 
7^000 to 75777 

00001 

01^77 to ^f77 
70000 to 72777 
76000 to 77777 

OOOJ+O to OG077 PERMANENT CONSTANTS 

As used at Convair, Flip is stored permanently on 
magnetic tape. A manually initiated operation transfers it to magnetic 
drum locations. The transfer to high speed storage is called "activating* 
and is programmed. 
(See next seotion). 
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Tho permanent oonstant pool is available to %he programmer, of course. 


and should never be changed. 


It is given below* 






CONSTANT POOL 


oool+o 00 00000 


00000 


Zero 


oocia 00 00000 


00002 


2 


000^2 61 00000 


000^5 


and ^lex Code Carriage Return 


OOQl+J 00 00000 


00003 


3- 


oooliU 00 00000 


0000U 


U» and flex code apace 


000I45 00 ooood 


00037 


Flex code deo* 31* 


ood+6 00 00000 


00052 


Plex code 1 deo* 1+2* 


0001+7 00 00000 


0007U 


Flex code 2 dec* 60* 


00050 00 00000 


00070 


Flex code 3 dec. 56* 


00051 00 00000 


00061+ 


Flex code I4. dec* 52* 


00052 00 00000 


00062 


Flex code 5 d®c» 50* 


00053 00 00000 


00066 


Flex code 6 dec* 5U» 


0005U 00 00000 


00072 


Flex code 7 dec* 58* 


00055 00 00000 


00060 


Flex oode \ 8 dec* 1+6* 


00056 00 00000 


00033 


Flex code 9 dec* 27* 


00057 00 00000 


00013 


11. 


00060 00 00000 


00012 


10. 


00061 00 00000 


00056 


Flex code minus "**" 


00062: 31 IO375 


521*21 


trA (^ 


00063 51 U631U 


6311*6 


10- 1 (3§> 


0006U 00 00000 


00077 


eix-bit extractor 


00065 21 6761+3 


2U177 


degree to radian (GS) 


00066 20 00000 


00000 


• 5 decimal H?) 
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00067 00 00000 00007 

00070 37 77777 77777 

00071 00 77777 00000 

00072 00 00000 77777 

00073 00 00001 00000 
0007k 00 00000 00001 

00075 00 00001 00001 

00076 00 07777 07777 

00077 00 00000 00110 

VII ACTIVATING: 



Extractor u 

Extractor it 
Advance of u 

Advanoe of v 

Advance of u and v 

u and v k -octal-digit extractor 

72. 



Flip is readied for use in high speed storage by "activating" it. 
A return jump followed by parameters accomplishes this. The parameters 
specify the extra storage space for all extra storage commands to be 
used. A zero follows the parameters, followed by the next command. 

The return jump is 37 70160 701U0 

The parameters arei 



J* Flip pseudo command code for an extra storage command 



Must be seroes 



C 
C 







V 

V 

V ^Location (usually high speed storage) for the extra 

v I storage required. 

The parameters must be followed by a *ero cell as a flag. 

HOTEi Previous methods used to activate Flip are now obsolete 
but will still work* 
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VIII OVERFLOW AND other special wqtbs . 

If overflow of the exponent or other impossible conditions 
arise, an alarm print occurs* The command address and the content 
of the two operand cells is printed* 

All operations incur the possibility of round off error, 
Beoause of this, exact equality of two floating point numbers 
will seldom occur no matter how simple a calculation was used to 
obtain them* Therefore, equality tests sh uld not be used and 
threshold jumps should always provide a tolerance* 

For all commands which store the result in R and not elsewhere, the 
accumulator contains D (H)# For all other cases, the left side of the 
accumulator contains the sign of the exponent (characteristic) of the 
number. 

For debugging, cells OI736, OI776, 01777 and 00002 to OOOlU usually 
contain all the information required to tell what Flip is cblng* 

The "Alarm, Octal and flexprint" routine (CV-115) is included in 
Flip. An alarm in Flip prints out the instruction, (it), (x), (y), b-^ 
and b 9 in tvo lines, preceded by the word "ALaRK". 
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INSPECT AND CHANGE ROUTINE 




I. Operating Instructions 




1. Set PAK to 70700. Start. The 1103 clears A 




and Q and halts. 




2* Set $ (Q) to a desired address and (optional) 




set (R) to the new content desired for that 




address. Start. The 110J prints change, the 




address, and the present content. It halts with 




the old content in Q and the new content in R. 




3a. Set or change (R) if desired. Start. The 1103 




stores (R) in the cell, prints out this new 




content, and halts at the same point as step 1. 




OPTION 




5b. If, after step 2, it is desired not to change 




the cell content, send control to 1*0000. The 




1103 prints out no change and halts at the same 




point aa step 1. (At this point, (1*0000) has 




its original value, unless it was the cell changed.) 




II. Specifications 




Drum address 70700 through 70773 (60) 




Number of commands to be modified - 60 




No standard constants or temporaries are used. 




Entrance 7C7OO (or 01000). This routine is 




available either with addressei starting in 




707OO or OlfXIO, It can be used to modify cell 




00000, providing no other oell is subsequently 




modified. 
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FLIP CARD TO PAPER TAPE KOUTBTB 

DESCRIPTION 

This routine reads blocks of numbers from Flip Cards and punches then in 
binary form on a bioetal tape* Each blook of H numbers is placed in oon~ 
secutive cells starting w^th address A* The first card of each block has 
A (octal) in columns one to five and V (deoimal) in columns six and seven* 
The last card of each blook is filled out with teres • A blank card 
following any blook causes all input cards to advance into the receiving 
hopper and halts the program. 

IHSTRUCTIOKSi 

1* Read Flip onto the magnetic drum* 

2, Start at JYftk* 
LOCATTOHi 

7172U to 71775 
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FLIP MAGNETIC TAPE STORAGE RATINE 

Location 71500 to 715&5 

This Routine stores a region of the internal ^emory jgp. magnetic 
tape in a self-reloading form. It can be used automatically or 
manually. Cells 00000 to 00037 and part of basic flip are used 
as temporaries, the latter being restored. No check sum is pro- 
vided. These instructions assume a locater block and a normally 
rewound tape. 

A-Transfer to Magnetic Tape. 

1. Manual Operation 

a # Place an advance tape command, 66j n in Q. 

b. Place the first address F and the last address L 
in u and v of A. 

c. Start at 71500. The tape will advance IfT nf 1 
blocks, store information on M blocks, rewind the 
tape and final stop. 

2. Automatic Operation 

a & b. Same as manual. 

c. Execute the command 37 71562 71501. Results are 
the same as manual except that no stop occurs, 



control returning to the next line. 
* 



A.-F + * ^ \ 



'NOTEt M ■ Integral part of, 
BVTransfer from MT. 

Use the locator block with n in A. If the transfer to 
magnetic tape was manual, a final stop occurs. If not, 
control is transfered to the point at which the dump 
was made* 
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DOUBLE ENTRY TABLE INTERPOLATION AND LOOKUP 
(DETAIL) / 

Using Flip / 

I SPECIFICATIONS! 

Storage i The sub-routine ie stored in cells OI3OO to OIU76. Flip 

and all Flip temporaries are needed in ES. Tables of any site are 

normally on MD. 

Tine 1 Roughly *3 seconds plus *3 seconds for eaoh function evaluated* 
Scheme usedt A function F (x # y)=/£ f c^'J is passed throtigh 

a 9 point square array of points ,- chosen from the given points in the , 

x-y plane* 

II DESCRIPTIOSr 

i 

';* v -.. : 

If from one to fi^s quantities Z are eaoh functions of two variable! 

x and £ and are given in the form of tabled values", (not necessarily at 

equal distant points ) # then this sub-routine evaluates these functions 

by interpolation* The nearest tabled values of x and y (designated 

Z (V and Tj are first found by the sub-routine. . Then these points and 

their nearest neighbors on each side are used to give a nine point inter- 

polatlon in eaoh table of corresponding 2 values* If x and/or y lie 

nearest to or beyond an endpolnt, the three endpoints are used* Surfaces 

of the formt Z*~ *£ * c *j "* *i 4 are passed through the nine tabular 
**'" J** » 

points and evaluated at the given point (x,y) for each Z * . 
m LOCATION AND STORAGBt 

This routine operates in cells 01300 to Oli+66* It uses cells 01300 
to 01307 for parameters $ and cells 00002 to OOO37 for temporaries. It is 
entered by the command 37 Olltfl 01310a 
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(00030)- X 

(00037) -Y 
B* Parameters r 
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'■ ' ■' ' 

Cell 


CC 


GO 


(v) 


01300 


00 


Dx 


D y 


01301 


00 


1 


3 


01302 


00 


»* 


n v 


01303 


00 


D, 


L* 


01302+ 


00 


Du 


L*. 


OI305 


Uo 


»s 


L* 


01306 




01507 





D^ « location of table of X values* 

Dy« location of table of Y values. 

1 »> Index of ourrent location in X table* (Start at sere) 

j * index of ourrent looation in Y table* (Start at zero) 

n„ z number of vai ues in X table* 

tky * mnriber of values in Y table* 

D y ~ location of table of Z 

L y « storage location for Z (X,Y) 

HOTBt The last parameter is indicated by a 1+0 in the first 
two octal digits* (Call 01305 in above example ) 
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X & T TABLES 1 



Cell 


1 " " ■ [ 

Content 


D„ 


X, 


»»*• ' 


It 


IH n,-l 

. 1 ■ r 




X,, 



D. 2 TABLES » 



Cell 



D* 



V 1 
D^n^-1 



D / n > 



Content 



Z (X,YJ) 



Z v (XJ,) 



X 



D y (n x -l)(ny-l) 



Z (XJ,) 



2 <W 



E. RESULTS r 



(L^-Z^X,!) forV=l,2 # 3, etc 
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ROUTINE TO LOAD FLIP ON MAGNETIC TAPE 
INSTRUCTIONS 

1. Rewind tap© 

2. Place 66 jn - in Q. (iw is the number used in k^ to 
locate Flip). ~" 

3. Start I4.OOOO and restart until dump is made. 

NOTES 1 

1* If Flip has just been read from MT or paper tape 
"NO GO'S" should not be printed. If changes have 
been made they will be. This routine corrects the 
sum adjuster after two "NO GO" prints. 

2. To dump a new paper tape stop at 56 10000 00X00. 
Use the Flip bioctal tape dump and dump cells 00000 
to 00277, i*0000 to UOO37, 70000 to 73777 and 76OOO 
to 77777« 
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Flip Biootal Tope Dump 

Location 1 71000 to 71105 

Permanent Constants usedi (0007it) a 1, (O0073)»2 1 5 (oooA|0)« 
Temper ies ( not restored ) 1 00000, 00002 to 00037, A and Q. 
Manual Operation 

' 1* Start at PAK « 71000 with Parameter word in Qt 

00 fffff 11111 

Where fffff is the addreee of the first word, 
11111 is the address of the last word. 

2. After operation, the routine stops with PAK *71000. 
Automatic Operation 

1. Enter with command t 37 71007 71003, followed by 

parameter words. The last parameter word is followed 
by the next instruction. 

Restriction! and Details 

)• The first and last addresses cannot be identical, (if 
• o, that complete storage class ie dumped as a closed 
set). 

2# A check address, leader and insert address are automatically 
punched after every 1*00 (octal) words • 

3. Colls 00001 and OO&4O to 01777 are not disturbed at any time. 
lu ES and MD are treated as closed sets. 
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INDEX JUMPS 

COMMAND CODES ) 

J4.O Index counter b, conditional jump \ • 
I4I4. Index counter b^ conditional jump 

The first address refers to a fixed point Integer, m. 
If b* is greater than or equal to m, b; is cleared to zero. If 
not, b- is increased by one and a jump is made to the second 
address. If b- is originally zero and this jump command returns 
control no some previous point, the intervening commands will 
be executed m+- 1 times with tagged addresses properly modified, 
b, is in cell 01776 and b z is in cell OI777. Both are fixed 
point integers and are initially zero. 



8-81 



rami »n«< 



ANALYSIS 
PREPARED BY 
CHECKED BY 
REVISED BY 



CV-11 

C O N V A I R 



C. J. Swift 



SAN OIEGO 



PAOtt 1+2-1 
REPORT NO. 
MODEL 

DATE 12/13/55 



FIXED POINT CONVERSION COMMANDS 

COMMAND CODES 

1*2 N (x,y) -> R 

51 R -> H (y,x) 

In order to convert a number N from fixed point 
to floating point, or vice versa, its scale factor s must 
be specified. The notation N (y,x) means that a fixed 
point number is stored in the first cell and the quantity 
35-s is stored in the last eight bits of the second cell. * 
Command 1*2 produces the Flip floating point form in B. 
Command 51 takes the Flip floating point form from R and 
produces the fixed point form in y. The quantity 35-s 
must be given in both cases. 
RESTRICTION! 

The oell containing 35-s in the last eight bits may 
not be lero e ven though 35-s may be 2ero* 



•HOTEt These commands use the quantity 35-s because that is 
more convenient to compute if it is to be computed instead 
of prestored. It can be seen that N (x #y ) is similar to the 
Flip floating point form exoept that the number is not 
normalised ana the exponent of 2 is stored in a separate oell. 
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Command Codet 
Number of Cells t 



FLIP 
Flexowriter Input Conversion Routine 

53 



I Description 

This command oonverts a two-word input representation of a number to the 
normalised FLIP form and stores t he result in y, but not in R_. The two 
words are (x) and fci- 1). When taken 6 bits at a time they are 12 flexowriter 
character codes • If the number represented 1st - 

H « q« • 10 p ', 0.1 4 q 1 < 1 

these flexowriter characters arei - 

1 2 3 h 5 6 7 8 9 10 11 12 
4='qqqqqqq±p p 

The decimal point (not present) precedes charaoter number 2. The sign positions 
are considered plus unices occuppied by a minus sign (octal 56). The twelfth 
digit is immaterial and will usually be a carriage return. 

If the number represented exceeds 2^ in absolute magnitude, or if any 
digit q or p is not a flexowriter numerical digit, an alarm halt will occur. 
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OTEG&ATIQN StJBROUTItfK 



Command Codei I4.6 
Drum Locatiom 7I6OO to 71721 
lumber of Colls in KSi 31 (decimal) 
Temporaries Usedi 00002 to 000J7 



I. 



II. 



IHTRODOCTIOKi 

This oonnnand is a revision of Gulp (ZMl*91-CH003). It uses the 
Gill-Runge-Kutte Method* to integrate a set of first order differential 
equations 1 



* 



ax 



*c (y, » y^ y n /*) (D 

from 



I tOIfA x* 



fiPECIFICATIOHSi 



A subroutine to compute these functions must be supplied starting 
in a cell specified by the address y. The number of equations minus 
one (n~l) f the increment Ax, and the quantities y, ...y~ , y{ •••y^ * 
«j'i •••q^ are stored in consecutive oells starting with tke aadreas 1. 
All the. numbers are in Flip form exoept n-1 which is in fixed form at 2 . 
The q*s are sero or infinitesmals exoept within the conmand* 

III, RESTRICTIONS AMD HOTEfli / 

1. The Flip counters in 01776 and 01777 *re v^ed but restored for 
the main routine. If used by the derivatives subroutine , they 
must be restored before its exit. 

2. The number of variables, n # must be at least two. 

3« If the Independent variable x Cocurs on the right side of 
any of equations (1), it must be treated as a dependent 
variable with a derivative of unity. 

It* The subroutine to compute the functions must be entered 
in its third cell and must exit by a jump from Its second 
cell. ("Standard Form") 



rORU I*!*'-* 
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5» If any derivative is zero, most of the integration 

oyole ie skipped, henoe dummy variables may economically 
be included for later use* 

6* The quantities n-1 and Ax may be varied at any time* 
However, the locations o? the derivatives, q*s, and the 
derivative subroutine are determined by the values that 
the parameters have the first time the subroutine is 
used* They remain fixed thereafter* 

7» The Gill Method will only integrate smooth funotions# ~ 
If inequalities cause changes (breaks) in the functions, 
these must be taken care of between integration cycles* 
Hew derivatives must be computed before the next inter- 
gration coamand is given whenever the functions are so 
altered* 

8* The truncation error is proportional to the fifth power 

of Ax* A test integration of the sine and cosine functions 
using ax*22J° caused a total error of approximately* 13& 
after sixty integration oycles. Due to the use of an 
unrounded floating point system, the double precision 
effect of the Gill Method does not work here, and round- 
off error may build up* 

•Gill, S*, Cambridge Philosophical Society Proceedings hi $ 96-108 (1950) 
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Square ^oot Subroutine 
Command Codei 50 

Number of Cells t 17 

Description 

This command computes the square root of (x) and stores it In y and R, 

with full accuracy. An Alarm Halt occurs for negative arguments, 

II Flow Chart 
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FLIP 

Print and Punch Subroutine 
Print Command C odet 52 
Punch Command C det 53 
Number of Cells t 53 
I Description 

These two commands convert (x) to a floating decimal form and print it 
on the flexowriter or punch a flexowriter tape. For these commands y is 
immaterial* If the Print subroutine is used, the Punch subroutine must be 
also specified to the loader. If the location of the first cell of the print 
subroutine is y, that of the punch subroutine must be y+- 2. 
Fifteen digits are printed or punched as follows t 

1 2 3 1+ 5 6 7 8 9 10 11 12 13 1U 15 
irq*qqqqqqspilp pspsp 

Where the number (in floating decimal form) is 
n =. q • 10P 

No carriage return is included* 
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FLIP 

Logarithm Subroutine 



Command Codet 5^+ 
Number of Cells t Jl 
I Description 



This command compute* log^ (x) and stores the result in y and R. 



A 



polynomial approximation is used which gives a maximum error of the order 

of 3 • lo** 8 . 
II Flow Chart 
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(1) See sheet 56, Approximations in Numerical Analysis, a publication of the 
Rand Corporation 
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flip cn/irac ! ju"ior? ouai'irr 

Urea Location « 7--^ to 72777 

$u--orcrics Used i C00C2 to CC0J7 e~"-d 7^100 to 75777 

Lo not opacify this to the Loddor 

I. GE2ZRAL EZJCRIPTIOS 

This cczz2Z& contorts ft specified block of razors frca flip fora to a flo&tiA3 
decimal fom cM prints thca on film with the chsrsatron. Up to 9$2 numbers ctn be 
handled with ona c&zand at spsods up to 66 mizibars par second. It is intended to 
cover both regular output end coda checking output raouirc^nte, 

The cenaral fomat of coda. page has ft heading, ft pa^e auEbor at the bottom, and 
positions for 128 numbers in four colusau, 32 in each eolmn. !Eha way in which 
those positions are filled in dascribed un&ar the various options below, 

II, CCCCIAKD F0K21 

ik$5 Jim vmv 

J specifies various options. Let the last fire bits of mi fom ft number 
r. ir (06m < 31) end lot the first bit of Elf be the ts^b&rj where j( is faro or ona. 
Then tha mnbsr of words converted and printed Is 

* »m (1+ 51^) 

III, BASIC OPtEOir (J - 0) 

Esch pa^e is titled Flip Output and pages are numbered consecutively from 
001 to 999* Conssoutive mobere follow each other vertically down tha four columns. 
Esch new use of tha output cczmand causae a new column to start, and leaves any 
rcnlclsr of the provious colunn bleak. If the block specified by any ecsaand will 
sot go onto the remainder of the current page, a new page is started. 



iv. j oraors 



1. 
2. 



J Odd* 

J ■ 2 or J. 



J, J • k or 5, 



H, J * 6 or 1* 



This causes a new page to be started with this information. 
3his causes the nunbars to follow imadiataly after tha 
preceding nucbars iiiatead of starting a naw colunn. 
Biis caucaa the numbers to follow each other in horitontal 
rows across the pn^e. Each naw con^rd causae the 
remainder of the last Una end ona block lica to be skippad. 
This is einilar to k or 5 except that no blank Una is left 
before this infonzation. 
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V. SPECIAL 103SS 



ft* Horisont&l and vertical format ooBssacda cannot be interspersed wlttoit 
daa^tr of printing on top of other lxifon&a,tlon* 

b* 3!ie title consists of ^8 eharaetron characters occupying c©2§s>2cutive 
positions frca left to rl'jht in cells ?2?k6 to 72755* Sbece k^" b« 
replaced vita another title if dasired* Us© octal 77 for blctsfe poeitiosja. 

o. The position on tho page of the last number printed is dsseribod by a 
nus^er !! stored in call 727G2 ecelcd at 2°. H starts at 1 in the upper 
left hand conssr and goes to 128 ia the lover right hand corner . It 
een be E^nigulated to giro special formats • 

d. Bie page number of the preceding page ie always stored in eell 72703* 
It ie stored with a scale factor of lo- 3 «2^ and without a sign bit* 
The constant ±cr 8 «2? 8 ie stored in cell 72716. 

e. Ia order to print a ras£ber of words greater than 33 but not a multiple 
of 32, two cosssnda suet be used. The second one will have less than 
32 words and use J • 2 or 6. 



YI* THGH3 



If the eharaetron tine delays do not hold up the 1103 (see below), the 
total time consumed by each Flip eharaetron output command Is 

T **3i sec* + 1\ .013 see* 

where n Is the number of output words* There are two eharaetron time delays 

d^ m *h see* 

d« * 2*6 sec* 

that can occur before resume pulsee are sent back from the eharaetron* These 
delays effect the output as follows: 

1, If at least e£+ e* seconds of other computation occur for each page and 
not more than one page (128 numbers) Is printed with each ccesaand* no 
delays occur* 

2* .£f at least a, + dg seoonde of other computation occurs for each page 
'itfS not more than two pages (256 natten) are printed with each command, 
add dx to the execution time for each coaa&aad. 

3* For all otker cases* the effect of da enters* The maartmnm continuous 
output rate is d* + da seconds per page, 

*/• for the non-dereloping oemsra, d* Is sero and dj, may vary* 



HOTSi RESTRICTION i S«e page 56-2 for a reotr lotion on this command* 
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FLIP CARD ROUTINES 
Pimch Command Code! 5& 
Read Command Code 1 57 
Storage Locations 73000 to 73312 Inc. 

73I4OO to 73^57 Inc. 

73771 to 73777 inc. 
I. Description! 

These commands read or punch cards which contain numbers in a floating 
decimal point form. Conversions from or to the Flip floating point form are 
performed during each card cycle. Either of two standard card forms can be 
used as described under the options below. These, commands are one-address, 
non-indexable commands of the formj 

lit cc j m vmv 

(1) 
Where V is the first storage address x ' , and K is the octal number of cards, 

H can vary from 00 to 77 octal. A 12 punch in the first column of any card 

being read will override N and terminate reading with that card. Whether this 

has occurred can be tested with the sign of (00001+) . This will be minus 1 

if the last card to be read had a 12 punch in column 1| otherwise it will be 

zero. J controls the card form ac indioated below. 



(l). RES TRICT Ifffi t (Not applicable to th« 1103A). Flip treats all commands 
as two address commands prior to inspecting the command code. If the index 
counter modification which occurs here leads to an illegal address, a fault will 
ensue. 

EXAMPLEt Thrt command li+56 001 U7770 has a rt y address" of 1770 with ta^s 

for both index counters. If either counter is 10 (octal) or more, 
an address will occur which lo illegal on the 1103. ' oX 
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The numbers 3» h, 5» 6* and 7 are reserved for future possible changes and 
should not be used for J. After any read contmand, a "check sum" of the Input 
is in Cell 00005* When quite a few cards are read, it is recommended that 
this sum be printed out so that readin differences can be spotted between 
repeated runs. 

II. Six field card (See card ECLF 12C). 

A, (For j*=0,) the card number columns are ignored on reading. On punching^ 
consecutive numbers are punohed here. The number for the last card punched is 
kept in cell 7325b* T* 1 * 8 number is reset to sero (i.e. first card numbered 

will be one) when Flip is reloaded from MT or PT. It can, of course, be set 
at will by the main program. Six consecutive storage cells are used by each 
card. 

B. For j m 1, the card number is read and punched. On the card a seven 
digit decimal integer followed by sign is used, In the memory a binary integer 
is stored. If the binary integer exoeeds 9,999,999 when punching, 9,999,999 is 
punched. Seven consecutive storage cells are used by each card with the card 
number in the first of the seven. 

III. Eight field card. (For j«2). 

This card form has eight similar fields of 10 columns each. These 
consist of (in consecutive order) 1 

7 columns of decimal digits for the fractional part of the representation. 

1 column for the sign of this part. 

1 column for the digits of the exponent (oharacterestic) of the 
representation. Exponents greater than nine are indicated by double or 
triple punching. For a punch in th» 12 row add 10 and for a punch in the 
11 row add 20. The maximum decimal exponent possible is 37. Higher 
exponents will be read incorrectly. 
1 column for the sign of this part. 
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IV. Us© of the reproducer. 

1. Prior to reading or punching; any cards, execute the command 
17 00000 73376, which picka one card in each channel. Do this 
only once , since Flip read and punch commands pick the next card 
each time. The extra station on the punch side Is taken oare of 
by the flip punch command and causes one extra cycle of the 
reproducer. 
2 If improper functioning of the reproducer occurs, restore the i 
reproducer with at least two cards picked, if punching, and the 
first to be read picked, if reading. Then start at 73771. This 
restores ES and stops. Press start to. repeat that Flip read or 
punch command. 
3*. The command 37 7337** 7337U will advance all cards processed into 
the receiving hoppers without disturbing further Flip read or 
punch commands. It takes an average of hi card cycles. 
k. The command 1 7 00000 00077 will place a blank card in the output. 
This command consumes only a few micro seconds of time. 



tf-v. 



CV-11 

ANALYSIS CONSOLIDATED VULTEE AIRCRAFT CORPORATION 

PREPARED BY C. J » S v,'ift ban DIEGO DIVISION 

CHECKED BY S. L. Pollick 
REVISED BY 



PAGE 60-1 

REPORT NO ZM-l|90 

MODEL AH 

DATE 11/15/& 



/ 



Sine oremand odot 



FLIP 
Sine and Cosine Subroutine 
60 

Cosine Command Codei 61 
Number of Cells 1 51 

I Description 

These two commands compute the sine or cosine of (x) and store it in 
y and R. A polynomial approximation io ueed^ 1 ' whioh gives a maximum error 
of the order of -5 " 10"^ ♦ For arguments so large that the roundoff error 
of the argument obscurea the result, an alarm halt ©qcurs. If the oosine 
subroutine is used, the sine subroutine "must also be specified toihe loader 1 
and if the looation of the first cell of the oosine subroutine la y,that of the 
sine subroutine must be y f- 2. 



(1) See sheet li+ t "Approximations in Numerical Analysis" t a publication of the 

Rand Corporation 8-92 
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FLIP 

Aro Tangent and Aro Cotangent Subroutine 

Arc Tangent Command Codoj 62 

Aro Cotangent Command Code* 63 

Number of Cells 1 hi 

I Description 

These two commands compute tan"*X or cot X and store the result in y and 
R» A polynomial approximation is used* The error is of the order of 
l/2 * 10 ♦ If the arc ootangent subroutine is used, 1he arctangent subroutine 
must also be specified to the loaderi and if the location of the first cell 
of the arctangent subroutine is y?, that of the aro cotangent subroutine must 
be y-*~ 2* 

All results lie between - 7//U and+Jfflf 



(1) See sheet 13, "Approximations in Numerical Analysis'* , a publication of the 

Rand Corporation 
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FLIP BSSSEL FUNCTIONS SUB ROUTIHE 

COKMAUD CODES 

6U J (x)-* y 

65«U*)~>y 1 y (x)-* 00057 

66j,(x)-^y 

67J ( (x)-^y j Y t (%)->00057 

IDCATIOUt 72000 to 72UU3 

TEMPORARIES 1 75110 to 75777 

Do not specify to the Flip loader* 

Thee© functions are computed by numerical approximations ' ' 
and are beliored correct to seven decimal digits. Coamands 
G4 and 66 are much faster than 65 and 67* 

(1) U T A C, October 19&, PP 2i+0-2la 
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FLIP 

Exponential Subroutine 
Command Codet "JO 
Number of Cells 1 ZJ 
I Description 

This command computes the exponential of (x) and stores it in 
y and R. Pull accuracy is obtained by a power series. For values 
of (x) *^ 6U$ an alarm halt occurs. •"* is obtained by computing 
e x and reciprocating. 
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FLIP COMPLEX ARITHMETIC SUBROUTINE 

Conanand Codes 

72 Y^X-^-S 

73 T-X-* S 
?JU Y*X~* S 
75 Y-tX-*S 

Humber of Calls t KfL (decimal) 
Temporaries Usedi 00002 to 00037 

Use command code J2 to speolfy this to the loader. 

These commands treat (x) +-1 (x +1 ) as X, (y) +■ i (y-w ) as Y f and 
(00036)+ 1 (OOO37) as 3, where i=-/~2 . x or y or both can be OO36 
and can be modified by counters b t and b x • Both components of X, of Y # 
and of 8 are packed floating point numbers* 
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FLIP 
Trace Subroutine 
Command Code : 77 
Number of Cells 1 26 

I Description 

The trace routine operates in two phases. Phase I operates concurrently 
with the running of the routine being tested and stores information on Magnetic 

4 

Tape 2 (MT2). Phase II operates separately from the routine being tested. It 
reads the information which was stored by Phase I on MT2, processes it and 
punches a paper tape output. The content of ES willbs automatically restored 
after this phase. 

II Phase I 

The trace subroutine muBt be specified to the loader. Its "command code* 
for this purpose is 77. It requires 26 cells. When loaded, it will operate 
whenever MJ1 is on. The MJ instruction is in cell 01735. This subroutine uses 
cells 71+000 to 7I4OI+I as temporaries. 

II I Phase 2 

This operation uses the ES a nd cell 1+0000 but will restore both when 
completed. Its operating instructions aret - 

1. Set PAK to 77600. Press Start. The 1103 prints out "Rewind 
MT2" and halts. • 

2. After rewinding MT2, *krt, (if PAK was disturbed, set it to 1+0000). 
The routine will search the tape for the data, t hen process it one 
block at a time. The output is punched on paper tape. The end of 
data will be apparent when the routine searches MT2 without punch- 
ing paper tape. Halt. 

3. To continue the problem, set PAK to 1+0000 and start. The 1103 will 
restore ES and 1+0 00 and halt with 1 a 56 00000 1+0000 command. 
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FLIP Direct Charactron Trace 
(711^0 to 7lij00 and 77570 to 77630) 




1. 


Activating the trace 1 

Start at 77&>0. Cells 00002 to 000lU and 7U&0 to 75777 
will be disturbed by activating. 




2. 


Tracing! 

Start your routine at any desired point. Tracing will be 
printed on the Charactron. 




3. 


Fault in any Flip command 1 

Start at 01735 • This inaurea that this command appears on 
the trace. 




li. 


Deactivating! 

Start at 77600. This is necessary to finish the trace. 
The frames will be properly run out f but the film must be manually 
indexed within a few minutes to prevent sticking. The same cells 
are disturbed as in activating. 




5. 


Continuing run! 

Start at any desired point. Flip will run normally. 

Traoing speed!- About 8 commands a second. 

Restriction!- After tracing, Flip on MD must be restored before 
it can be loaded into ES again. 
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XV Output 

The trace routine output prints a 52 dip;it line for each FLIP instruction, 
If a jump occurs, either an erroneous line appears or no line at all. ome 
FLIP subroutine commands include FLIP basic commands. These will appear as 
extra lines before the FLIP subroutine command line. The lines have the forms 

AAAA OP xxxx yyyy ± q,qqqqqq ± pp 
where AAAA is the last four dibits of the address of the instruction* 
OP is the command code, 
xxxx is the basic x address, 
yyyy is the basic y address. 
The result of the operation, in floating decimal form, is q • 10 P where 
1 4 <1 < 10© S-orae f -y^e FLIP subroutine commands do not leave their result 
in R* For these, the result, q • 10^ will be erroneous. 

In order to avoid confusion, when several problems are traced using the*^ 
same magnetic tape, Phase II overwrites the trace information as it is 
processed. 
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C\Ui - Coptciabor, 19$h Rov 6/2o/^U 

. ibccmbly Program - SC 001 

Each , subroutine to bo assembled by tho assembly program mu3t be codod 
In cbsoluto f or.a as if its initial Instruction were to bo located at ad- 
dress OlOOOo In actual fact, howover, tho subroutine is placed in electro- 
. static storage at an atost arbitrary location solocted by the coder© It is 
tho function of tho assembly routino to modify all addresses in the sub- 
routine commands that are dependent on tho location of the initial commando 
In order to perform this function correctly, tho assembly routine must be in- 
formed of tho actual electrostatic address s of the initial corranand of each , 
subroutine and of tho number n of successive coin&ands to be modified in each 
casoo It wiH than scan (s + j-1) j - l,2,o.»n for each subroutine altering 
tho and £ addresses by adding 8-01000 to them whenever necessary,, A par- 
ticular address will be modified if and only if the 10th bit from the right 
in Its l£ bit array is a ono l e e'/Tf it is of the form xxx sod xxx xxx xxx«> 
For electrostatic addresses this means that all addresses of the form 01 XXX 
(X an arbitrary octal digit) and only such addresses will be modified. Sence, 
N all electrostatic addresses which are to be absolute i.e. Independent of the 
location of the initial instruction must have the form O QXXX . The addresses 
of the accumulator and Q-register should bo given as 20000 and 10000 re- 
spectively In order to avoid assembly modification. Since the assembly routine 
modifies n successive commands of tho subroutine starting from soma initial 
one, subroutine constants should commence in address 10000 4- n<» 

Tho assembly subroutine is coded as If its initial command. were stored 
at address 00100 and its final command at address 00121 and must be so 
'. located In electrostatic memory to be properly used. It is permanently 
stored at drum locations 77756-77777 (18)« 

Before entering the assembly subroutine the coder must set the exit 
address (00101) # This can bo done expeditiously by entering the subroutine 
with tha instruction 37 00101 00100 o This stores the return address into 
fl (00101) before entering, so that control will be returned to the next ad- 
> ; dress following tho return junp 

The coder must provide the assembly routine with the various numbers 
• ''"•A" n which it naedoo If there are k subroutines to be assemEed, this in- 
formation must bar' lat addresses 00121 ♦ lj i - l,2,...,k, where op 
(00121 + i) - 00, Q (00121 + I) • n„ (00121 + I) - s. The (00121 ♦ k + l) 
must always be set Identically equal to zero. Thus for example, if k » 3 " 
_. ! (i.e. throe subroutines are assembly modified) and n-i » 13, iu * 5> '•»n<» \">*21.} " '><.l 

rj! - • s x « OlOSH^ so -..00g00 v ^d-S3,« ( 01700 ^ (on, n^^rs^l^g 400^)^0, data, for ■•,'. 

«» : ^q.ass6nbly_»rout1:i3 1 i wg\jXd.-. , ba as follows 1 -' , '. - : ' 

oi '■■....'■.■,•'..,.•.■• • 

o . . • 

X ' . ..:.': ■■- ~ , 

(X, :..■■■■' 



Address t 


Contents • 


1)0122 


00 00013 010>li 


00123 


00 00005 00200 


Q012u 


00 00021 01700 


00125 


00 00000 00000 



The coder should bear in mind that the assembly routine Itself -uses as 
temporary storage the locations 00005, 00006, and 00007© 

Su;.:.;na 



Only flulttfolTr epdod subroutines may ba assembled. A subroutine is con- 
sidered toco's "sui Ubly "coded if It satisfies the following" conditions. 

(1) it is written in aboolute form as if its initial in3truc+««« 

wora to bo lo cited at address 01000. 

8-99 a 
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(2) all addr^ssDS Ind:,p3ndDnt of th© location of tha Initial it, :. > 
atruction aro of tha fora xiac 2c ;Q :acx :::dc xxx. 

1 (3) all addresses to be modified are of th© form xxx xxl xxx xxx 3poc 

(U) all subroutino constants are located Immediately following tha 
last subroutine instruction. 

The coder must load all subroutines to bs modified into the locations 
in electrostatic storage which he has chosen. 

The coder must block transfer the assembly program from drum addresses 
777^6-77777 to electrostatic addrosses 00100-00121. « 

The coder must load the numbers n and e for each subroutine to be modified 
into addresses 00121 * i, i • .l,2,»#o k, where k is the number of subroutine 
to be modif iedo " 

The coder must load zero into the address 00121 + k * 1* 

The coder must set (00101) before entering the assembly program, and 
must provide for entry to the «£ ably program. 



Extract (00121 + i) 
(initially i - 1) 



Is. 

o 

■ 



Si 

8 






J 



is (00121 ♦ i) •• Ot 



yes v exit 

all SR»s modified 



no 



store 214 



set the address "s" 
to be 64 



T 



store & - s^ '.* 1000 



3 






increase i by 1 






extract 



t (s)j ' 



form C 



>26* 



& + 



(where bj > jth bit 
from tha right of (a) 






o 
o* 






add C • to (s) and 
store back at s 

_ &—. — «. 

JLnoreas* s by 1 
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FLIP (revised I2/9/&) 
Subroutine Spcoificationo 
FLIP subroutines are coded to start in coll 01000 and are modified by tho 
assembly routine under control of tho FLIP loader routine . Each eubroutine le 
assigned a command codo number* 

I Commnd Cod© PareLiotor 

If tho subroutine is assigned command number OP (octal), a parameter is 
placed in drum location 76555 Hh 2 * OP. It hao the forsii- 

mi D.A. n ^ 

xx xxxxx xxx Ox 
•whore D.A. ■» Rmn address of tho subroutine 
^ n 2** m l ~ auji ^ Qr °? oolle occuppiod 
n s nurabor of cells modified 

II Inp u t Information 

At tho entry to tho subroutine, tho temporaries contain this information* 
Second Octal Digit of Connnnd Code , 





0' 


1 


2 


3 


u 


5 


6 


7 


00005 


to 


to 


to 


to 


-to 


-to 


-to 


™-to 


00006 


(y) 


to 


(y) 


(y) 


(y) 


(R)' 


(y) 


(y) 


00007 











to 











(R) 


ft (0173M 


y 


y 

— 


20000 


20000 


y 


y 


20000 


20000 



00004 

00010 

00011 

00013 

R 

10000 

Notes 1 



Cowraand code in I s * tr/o octal digits* 

36 bit extension of exponent from (00005) 

36 bit extension of exponent from (00006) 

Execution addresses. x and y in the u and v positions, 

36 bit extension of exponent from (00005) 

Command oode in last two ootal digits* 

If any argur^nt was rero, it has been transformed to 000000000200 

(octal) with the oxponent 777777777600 (ootal). 
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FLIP 



(revised 12/9/5U) 



III Exit Information 



Subroutine exits arc to 01607, 01721, 0173k, 01735 or 760/45. 

a. Exit at OI0O7. Place zero in,/{ and p "° k° 017 3k ( « e below) 

b. Exit at 01721. Normalize, test, pack and store. In this case the subroutine 
should leave : 

q (25) in 00005 
p (0) in 00010 
Where the desired result is q • 2^. q and p nay be any possible 56 °it 
numbers-. The routine will nr-rr alize, test, pack into R, and f-o to 0173k» 

c. Exit at 0173k, OI735 or 01737 



(see table above) 
(exits to trace if used) 



0173^ 11 20000 JOOOOOJ ST^RE RESPLT 

01735 k5 10000 [01736] TRACE? 

01736 1*5 00000 (OOOOO] Exit 

01737 37 00000 76OI15 ALARM EXIT 
Notes j 

1. All references to exits above must be in unmodified orders, 

2. Double duty subroutines (e.p-. sine and cosine) are assigned two 
command codes B.nd treated as two overlapping; subroutines, 

IV " Own Code" Subroutines 

Frequently occurring subroutines ean be coded as FLIP subroutines. Before 
using; other FLIP commands in such subroutines, it is necessary to transfer 
S (1736) and such other information as musb be saved to new -locations* 
FLIP basic orders do not use cells 00015 to OOO37 or cell 00002, If the 
subroutine needs no modification or change of location, use 00 0G001 00000 
for its command code parameter. 
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II Flow Chart 



©-£ 






T 



©^ 









"iltftmMl pt," to "pj 



V ~=1. ' .1 










* # 



i£ 



put dl^U'ot ^.c. 

C«nv*rt" f»i *•/»«* +0 
With froUty t* P 



© 



XT6RP Hi? 






loi /A, I 



' K " < 






Q :/*[)* 




,' 


> 
t 


*— 


d.e+i-iAz 




to N-tfr 



I 



Ctfnvcvf A* *» fue4 
8*i(cte Pi. IP ffmr 






8-107 



CV-11 

ANALYSIS CONSOLIDATED VULTEE AIRCRAFT CORPORATION 

PREPARED BY C. J. Swift SAN DIEGO division 

CHECKED BY S. L. Pollack 
REVISED BY 



PAGt 6 of 100 

REPORT NO ZK-i|9Q 
MODEL All 
DATE 11/15/& 



Sine and Cosine Subroutine 



II Flow Chart 



fco\ — *• O -+ 



.(3)~l! 



^ 



^7: ScX )- 



ALAftM 



(-27: s. >y~ > ° ~»* 



3 



x-* 5 *^ (g) 



^ Cfen»r L 







1 






o -+ P 

1 "t C 



; >> 


x 1 . P + ^j^P g) 




* 


' 


>c 


} Cz»a, 


> *««/) 




\ *-hcA£ 




} 


r 

f 




|x-p^x @ 




' 


' 


- 


r^-C ° : p 


1 


f 


-p -^ p 


l "j 


r 




1 




-? 


>c X 



F*ir to 

*oRA|AU?( 



pa f«rti*f pd'ttAHiMj 
t- 5 Subscript «» 
coefficients 



Q -I PQ 



FORM nil 



CV-11 

ANALYSIS CONSOLIDATED VULTEE AIRCRAFT CORPORATION 

PREPARED BY C. J. Swift BAN DIEGO DIVISION 

CHECKED BY S. L. Pollack 
REVISED BY 



PAGE 7 Of 100 

REPORT NOZM4*9Q 
MODEL All 
DATE H/I5/5I 



Arc Tangent and Arc Cotangent Subroutine 



II Flow Chart 



£$—?-»©•. --!■ 


i 


(£2J — •*&' 




T N ' 


> 


r 


ScX-«->S<^ 


V 


' 



S<X*,o 



-s c )r -> Sex 

J 



ii 



$«Vtx-»-»s*)c 



f<X;o 



< r 



o -> x 



2. 









^ 



X*P -* X 



h» 



#1 #*•."? )t 
^ 



yri 




^-> 



£-*■** 



*' 



Set stove oft** 






8-109 



ANALYSIS 

PREPARED BY C, J. Swift 

CHECKED BY 



C O N V A I R 



eft- 



SAN OltCO 



1.1 



REPORT NO ZM l490"H 

MODEL All 



REVISED BY 


PATE 


1- 


■50-56 


i 


FlIP CARP Ro^i-f^Bs j 






F*~o At/NG- 


. binakx re #=t6/\r/fi^- ppci^Al tiA/retoior 


CAfpvoy. S *m*!/i jreroWs (i» //<>?) 1 






I*'ltl«//y 


i ; 






01 = 


/V.* s 1 ? /* 1 * '/„ a- 7 -c^<i"' ; l 






P<rf (■«« 


j 








i 






SftUHl /ry^dhrvf 




! 


\ 




S'=/«5" + t O^t-5^ -if <s"JO 




i 




W'-M'"/.".^** 










: o ' 


" V 






1 




Step y 






•"'■' 




i 

**"= io~*.A/"' 








%» A"'".,** 9 *" 




■> 



rOMM l%l»-^ 



8-109a 






2 



ANALYSIS 

PREPARED BY C# j. Swift 

CHECKED BY 

REVISED BY 



C O N V A I R 

SAN DIEGO 

CV-11 



PAGE 7b 

REPORT NO. 2M I4QO-II 

MODEL j^n 

DATE I.3O.56 



ri-lf CARD RouTJfcl&S ? 

FLOAT/tyO- 1>BC/M*L to floating. P/KA^y c»Nvwst%%c^ 
fAppr** (0 *is 0* U03) \ 



7 



( K fi A/Mot i>M*l># l?**<3<? 






c banc* 



/_ 



-*3 









Base x 



1 

\ 



A"'" = 4/'", ,-* 



■JW"ww*j|£ ,* | iip»iM|pf»# 



(MNO E T I 'ft r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



CV-11 



PAGE 8 Of 100 

REPORT Ztl#0 

MODEL All 

DATE 1-12-56 



MAGNETIC TAPE ROUTINE FOR SERVICE ROUTINES 
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X 

a* 



9KM NO. C T. i 1>l r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



CV-11 



PAGE 10 Of 100 

REPORT ZM k90 

MODEL JQJ 

DATE 1-12-56 



MAGNETIC TAPE ROUTINE FOR FLIP 



CO 

o 

Ch 



X 
Ok 



70100 


70100 


11 


70112 


00000 


SET Fl 


70101 


70101 


75 


30036 


70103 


SAVE ES 


70102 


70102 


11 


00002 


71742 


WORKING SPACE 


70103 


70103 


64 


00001 


00000 


READ ONE BLOCK OF MT 


70104 


70104 


11 


00000 


20000 


LOCATER 


70105 


70105 


43 


70113 


70110 


BLOCK t 


70106 


70106 


35 


70107 


70107 


BACK UP MT 


70107 


70107 


22 


00001 


00000 


TO CORRECT PLACE 


70110 


70110 


66 


00000 


00000 


ADVANCE TO FLIP III 


70111 


70111 


64 


00001 


00000 


READ IN FIRST BLOCK MT 


70112 


70112 


45 


00000 


00002 


JUMP 


70113 


70113 


45 


07777 


00002 
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FORM NO. E. T. ■ t <f> ■ r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP, 



9AN DIEGO CALIFORNIA 



CV-11 



PAGE 11 Of 100 

REPORT EM JI^QO 

MODEL All 

DATE 1-12-56 



I 

CO 



o 



X 





ACTIVATOR 






...... 


70140 


00074 


75 


30070 


70142 


SAVE CELLS 


70141 


00075 


11 


00100 


74100 


TO BE USED 


70142 


00076 


31 


70160 


00017 


SET COMMAND TO 


70143 


£0077 


15 


20000 


70145 


PICKUP PARAMETERS 


70144 


00100 


75 


30040 


70146 


PICKUP 


70145 


00101 


11 


30000 


74200 


PARAMETERS 


70146 


00102 


75 


30016 


00120 


LOAD ROUTINE 


70147 


00103 


11 


70150 


00104 


TO ES 


70150 


00104 


21 


00105 


00116 


LOCATE 


70151 


00105 


11 


00121 


20000 


ZERO 


70152 


00106 


47 


00104 


00107 


FLAG 


70153 


00107 


31 


00105 


00071 


SET 


70154 


00110 


23 


20000 


00117 


EXIT 


70155 


00111 


35 


00114 


70160 


COMMAND 


70156 


00112 


16 


00111 


76645 


ENTER OLD 


70157 


00113 


45 


00000 


76575 


LOADER ROUTINE 


70160 


00114 


75 


30070 


30000 


RESTORE ES 


70161 


00115 


11 


74100 


00100 


AND EXIT • 


70162 


00116 


00 


00001 


00000 


CONSTANTS 


70163 


00117 


00 


00011 


00121 




70164 


00120 


75 


30040 


00104 


' LOAD PARAMETERS 


70165 


00121 


11 


74200 


00122 


TO ES 



8-113 



iRM NO. E. T. ■ 1 9)-r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA 



CV-11 



PAGE 12 

REPORT ZM 1+90 

MODEL AH 

DATE 3-15-56 



COMPLEX ARITH FLIP 



70620 


01000 


15 


00013 


01006 


SET X PICKUP 




70621 


01001 


31 


00013 


00017 


SET Y 




70622 


01002 


15 


20000 


01024 


PICKUP 




70623 


01003 


75 


30020 


00032 


LOAD ROUTINE 




70624 


01004 


11 


01005 


00015 


TO TEMPORARIES 




70625 


00015 


75 


30002 


00017 


PICKUP 




70626 


00016 


11 


30000 


00032 


X 




70627 


00017 


55 


00004 


10004 


TEST 




70630 


00020 


44 


00021 


00023 


COMMAND CODE 




70631 . 


00021 


75 


30007 


00021 


LOAD ADD 




70632 


00022 


11 


01025 


00021 


AND SUBTRACT 




70633 


00023 


75 


30011 


00025 


LOAD COMMON PART 




70634 


00024 


11 


01034 


00013 


MULTIPLY AND DIVIDE 




70635 


00025 


44 


00026 


00015 


TEST COMMAND CODE 




70636 


00026 


75 


30005 


00013 


LOAD 




70637 


00027 


11 


01045 


00023 


DIVIDE 




70640 


00030 


16 


00002 


01736 


RESTORE FLIP EXIT 




70641 


00031 


45 


06003 


01735 


EXIT 




70642 


00032 


16 


01736 


00002 


SAVE FLIP EXIT 




70643 


00033 


75 


30002 


00015 


PICKUP 




70644 


00034 


11 


30000 


00034 


Y 




70645 


00021 


44 


00022 


00024 


ADD OR SUBTRACT 




70646 


00022 


15 


00031 


00024 


CHANGE COMMANDS TO 




70647 


00023 


15 


00031 


00026 


SUBTRACT X 




70650 


00024 


1402 0032 0034 


ADD 




70651 


00025 


11 


20000 


00036 


REAL PARTS 




70652 


00026 


1402 0033 0035 


ADD IMAGINARY 




70653 


00027 


11 


20000 


00037 


PARTS 




70654 


00013 


15 


00016 


00021 


CHANGE COMMANDS TO 




70655 


00014 


15 


00024 


00016 


REVERSE SIGN OF IMAG 


X 


70656 


00015 


1422 0032 0034 


REAL 




70657 


00016 


1427 0033 0035 


PART OF 





o**XlA 



FORM NO. E. T. - 1 (ft r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFDRNIA 



CV-11 



PAGE 


r-5 


REPORT 


ZM 1+90 


MODEL 


All 


DATE 


3-15-56 



COMPLEX ARITH FLIP 



i 



70660 


00017 


11 20000 00036 


PRODUCT 


70661 


00020 


1422 0032 0035 


IMAGINARY 


70662 


00021 


1423 0033 0034 


PART OF 


70663 


00022 


11 20000 00037 


PRODUCT 


70664 


00023 


45 00000 00030 


JUMP TO EXIT 


70665 


00023 


1422 0032 0032 


COMPUTE 


70666 


00024 


1423 0033 0033 


DENOMINATOR 


70667 


00023 


11 20000 00032 


FOR QUOTIENT 


70670 


00026 


1430 0032 0036 


FINISH 


70671 


00027 


1430 0032 0037 


DIVISION 






HK( NO C T I I* 



CONVAIR ~ DIVISION OF GENERAL DYNAMICS CORP. 



SAN Oik'.O CALIFORNIA. 



cv-ii 



PAGE }l r jiji 

REPORT 2i~a l\30 

MOD Li.. All 

dais: . I~l^» r i6 



INSPECT AND CHANGE 





70700 


70700 


11 


70727 


00000 


SET FI 




70701 


70701 


23 


10000 


10000 


CLEAR A AND Q 




70702 


70702 


56 


00000 


70703 


HALT 




70703 


70703 


11 


40000 


70744 


SAVE 40000 




70704 


70704 


11 


20000 


70745 


STORE NEW 




70705 


70705 


16 


10000 


70726 


SET 




70706 


70706 


55 


10000 


00017 


VARIABLE 




70707 


70707 


15 


10000 


70716 


COMMANDS 




70710 


70710 


61 


00000 


70773 


PRINT 




70711 


70711 


75 


10007 


70713 


OUT 




70712 


70712 


61 


00000 


70752 


CHANGE 




70713 


70713 


55 


10000 


00006 


PRINT 




70714 


70714 


11 


70747 


70746 


OUT 




70715 


70715 


37 


70743 


70735 


ADDRESS 




70716 


70716 


11 


30000 


10000 


PRINT OUT 




70717 


70717 


37 


70743 


70734 


OLD 




70720 


70720 


11 


70745 


20000 


REPLACE NEW 




70721 


70721 


11 


70730 


40000 


SET 40000 




70722 


70722 


56 


00000 


70723 


HALT 




70723 


70723 


11 


20000 


10000 


PRINT 




70724 


70724 


37 


70743 


70734 


NEW 




70725 


70725 


11 


70744 


40000 


RESTORE 40000 




70726 


70726 


11 


10000 


30000 


STORE NEW 




70727 


70727 


45 


00000 


70701 


JUMP 




70730 


70730 


45 


00000 


70731 


JUMP 




70731 


70731 


11 


70744 


40000 


RESTORE 40000 


r-i 


70732 


70732 


75 


10012 


70700 


PRINT 


6 

o 


70733 


70733 


61 


00000 


70747 


NO CHANGE 




70734 


70734 


11 


70757 


70746 


OCTAL 


X 

tit 


70735 


70735 


61 


00000 


70747 


WORD 




70736 


70736 


55 


10000 


00003 


PRINT 


\ 


70737 


70737 


51 


70761 


20000 


SUB 



8-H6 



OHM NO E T ■ I P/ ■ r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



CV-11 



PAGE 15 Of 100 

REPORT 2M l£0 

MODEL All 

DATE 1-12-56 



6 

o 



X 

a. 



INSPECT AND CHANGE 

70740 70740 35 70762 70741 

70741 70741 00 00000 00 * 

70742 70742 41 70746 70736 

70743 70743 45 00000 30000 

70744 70744 00 00000 00 

70745 70745 00 00000 00' 

70746 70746 00. 00000.00*0 

70747 70747 00 00000 00004 

70750 70750 00 00000 00 *6 

70751 70751 00 00000 00003 

70752 70752 00 00000 00004 

70753 70753 00 00000 00016 

70754 70754 00 00000 00005 

70755 70755 00 00000 00030 

70756 70756 00 00000 00006 

70757 70757 00 00000 00013 

70760 70760 00 00000 00 20 

70761 70761 00 00000 00007 

70762 70762 61 00000 70763 

70763 70763 00 00000 00037 

70764 70764 00 00000 00052 

70765 70765 00 00000 00074 

70766 70766 00 00000 00070 

70767 70767**00*00000 00064 

70770 -70770 00 00000 00 62 

70771 70771 00 00000 00066 

70772 70772 00 00000 00072 

70773 70773 00 00000 00045 



ROUTINE 



8-117 



MO. E T I I'. 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



*>AN DII.UO. CAUFOHNIA 



cv-ii 



pace 16 of 100 

REPORT ZM 1*90 
MODEL All 
DATE 1-12-56 



BIOCTAL TAPE DUMP 



X 

04 



71000 


71000 


37 


71052 


71014 


MANUAL PRESET 


71001 


71001 


23 


10000 


10000 


CLEAR A AND Q 


71002 


71002 


56. 


00000 


71000 


HALT 


71003 


71003 


31 


71007 


00017 


PICKUP 


71004 


71004 


15 


20000 


71005 


NEXT 


71005 


71005 


31 


01004 


00005 


PARAMETER 


71006 


71006 


43 


20000 


71010 


DONE? 


71007 


71007 


45 


00000 


01005 


EXIT 


71010 


71010 


55 


20000 


00037 


PARAMETER IN A AND Q 


71011 


71011 


21 


71007 


00074 


STEP EXIT 


71012 


71012 


37 


71052 


71014 


AUTOMATIC PRESET 


71013 


71013 


45 


00000 


71003 


RETURN 


71014 


71014 


75 


30030 


71016 


LOAD ROUTINE 


71015 


71015 


11 


71053 


00010 


IN TEMPORARIES 


71016 


71016 


31 


10000 


00017 


SET FINAL 


71017 


71017 


15 


20000 


00034 


ADDRESS 


71020 


71020 


15 


10000 


00010 


SET PICKUP 


71021 


71021 


31 


10000 


00071 


TEST STORAGE 


71022 


71022 


46 


71023 


71024 


** l» ri O O 


71023 


71023 


54 


00036 


00004 


SET EXTRACTOR FOR MD 


71024 


71024 


37 


71046 


71025 


SET SWITCH 


71C25 


71025 


75 


00260 


71103 


PUNCH 


71026 


71026 


63 


00000 


00040 


LEADER 


71027 


71027 


31 


00073 


00010 


SET UP 


71030 


71030 


35 


00010 


00035 


INTERIM 


71031 


71031 


11 


00036 


ioooo 


v*n el %*j\ 


71032 


71032 


53 


00034 


00035 


ADDRESS 


f fl* W «3 *■ 


71033 


15 


00010 


01775 


INSERT ADDRESS 


71034 


71034 


55 


01775 


10025 


TO Q 


71035 


71035 


15 


00023 


00020 


SET TO PUNCH 


71036 


71036 


15 


00022 


00021 


INSERT ADDRESS 


71037 


71037 


37 


00024 


00011 


PUNCH INSERT ADDRESS 



8-118 



W NO E T - i y F 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DICUO. CALIFORNIA 



CV-11 



PAGE 


l 'f of 100 

ZM U90 


REPORT 


MODEL 


All 


DATE 


1-15-56 



BIOCTAL TAPE DUMP 



1 

co 



o 



X 

a, 



71040 


71040 


15 


00022 


00020 


SET TO PUNCH 


71041 


71041 


45 


00000 


00010 


DATA WORDS 


71042 


71042 


15 


00010 


01775 


CHECK ADDRESS 


71043 


71043 


55 


01775 


10025 


TO Q 


71044 


71044 


15 


00023 


00021 


PUNCH CHECK 


71045 


71045 


37 


00024 


00011 


ADDRESS 


71046 


71046 


75 


00100 


71025 


PUNCH 


71047 


71047 


63 


00000 


00040 


TRAILER 


71050 


71050 


37 


00030 


00010 


PUNCH LAST FRAME 


71051 


71051 


37 


71046 


71042 


PUNCH CHECK ADDRESS 


71052 


71052 


45 


00000 


71001 


RETURN 


71053 


00010 


11 


34000 


10000 


PICKUP 


71054 


00011 


16 


00016 


00013 


PRESET 


71055 


00012 


55 


10000 


00006 


ASSEMBLE . 


71056 


00013 


11 


10000 


34000 


■ 


71057 


00014 


2-1 


00013 


00074 


B I OCTAL 


71060 


00015 


42 


00037 


00012 


DIGITS 


7106"! * 


"00016 


63 


00000 


00002 


PUNCH 


71062 


00017 


63 


00000 


00003 




71063 


00020 


63 


00000 


00004 




71064 


00021 


63 


10000 


00005 




71065 


00022 


63 


00000 


00006 




71066 


00023 


63 


10000 


00007 


DIGITS 


71067 


00024 


37 


00024 


34000 


SWITCH 


71070 


00025 


21 


00010 


00073 


STEP 


71071 


00026 


11 


00036 


10000 


PICKUP 


71072 


00027 


53 


00034 


00010 


COMMAND 


71073 


00030 


37 


00030 


00031 


SWITCH 


71074 


00031 


43 


00034 


71050 


FINAL END 


71075 


00032 


43 


00035 


71043 


INTERIM END 


71076 


00033 


45 


00000 


00010 




71077 


00034 


11 


34000 


10000 


FINAL ADDRESS 



fi-)lQ 



)«M NO E T I I- 



CONVAIR - DIVISION Of GENERAL DYNAMICS CORP. 



iAN OICSO CALIFORNIA 



cv~u 



PAGE 18 

REPORT 211 ^90 

MODEL All 

DATE 1-15-56 



BIOCTAL TAPE DUMP 



71100 


00035 


11 


34000 


10000 


71101 


00036 


00 


36000 


00000 


71102 


00037 


11 


10000 


00010 


71103 


71103 


63 


10000 


00040 


71104 


71104 


23 


01775 


01775 


71105 


71105 


45 


00000 


71027 



INTERIM CHECK ADDRESS 

XTRACT0R TO PREVENT CARRY 

COMPARATOR 

PUNCH INITIAL FRAME 

CLEAR TEMPORARY 

RETURN 



1 

CO 



a- 

Oh 



8-120 



0-<M NO E T • 1 1« ■ 



CONVAIRt - DIVISION OF GENERAL DYNAMICS CORP. 

UAN UlEliO CALIFORNIA 



By i C. J. Suifij 

FLIP CHARACTRON TRACE 



CV-11 



PAGE ^'\ ». .19 of 100 
REPORT . Zll l£Q , , ; , 
MODEL. All " 

DATe Auguat 9, 1955 



PROCESSING SUBROUTINE 





71140 


434 


75 31340 71142 


SAVE 




71141 


435 


11 00440 74440 


ES IN MD 




71142 


436 


75 30240 00675 


•LOAD INTO 




71143 


437 


11 71144 00440 


' ES 




Z1144 


440 


16 01600 75506 


RE5T0RE TALLY- COMMAI 




71.145 


441 


75 30140 00443 


LOAD TRACE 




71146 


442 


11 77637 01330 


INFORMATION TO ES 




71147 


443 


16 00473 01735 


REMOVE TRACE JUMP 




71150 


444 


17 00000 00610 


START CHARACTRON 




71151 


445 


75 10011 00450 


PRINT 




71152 


446 


77 10000 00637 


HEADING 




71153 


447 


00 00000 0000 






71154 


450 


17$ 30003 00452 


PICKUP 




71155 


451 


11 J01330] 00640 


INFORMATION 




71156 


452 


54 00641 20052 


TEST 




71157 


453 


11 20000 20000 


FOR 




Til 60 


454 


43 00613 00474 


14 COMMAND 


i— 4 
i— 1 


71161 


455 


21 00451 00616 


STEP COMMAND 


1 

CO 


71162 


456 


42 00473 00561 


DONE SIN Z 


o 


71163 


457 


21 71176 00614 


STEP PAGE NO 


a. 


71164 


460 


11 20000 10000 


PLACE IN Q 




71165 


461 
* 


11 00615 00627 


SET POSITION 




71166 


462 


37 00604 00572 


PRINT DECIMAL DIGIT 




71167 


463 


37 00604 00572 


PRINT DECIMAL DK3JT 




71170 


464 


17 00000 00611 


STOP CHARACTRON 




71171 


465 


17 00000 00612 


TURN PAGE ' 
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CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DltGO CALIf OWNI4 

CV-11 



Byt C. J. Swtft 



FLIP CHARACTRON TRACE 



page 3) of 100 

REPORT ZU U90 
MODEL All 
DATE . 

August 9, 1955 



71172 


466 


71173 


467 


71174 


470 


71175 


471 


71176 


472 


71177 


473 


71200 


474 


71201 


475 


71202 


476 


71203 


477 


71204 


' 500 


71205 


501 


71206 


502 


71207 


503 


71210 


504 


71211 


505 


71212 


506 


71213 


507 


71214 


510 


71215 


511 


71216 


512 


71217 


513 


71220 


514 


71221 


515 


71222 


516 


71223 


517 


71224 


520 


71223 


521 



23 00523 00470 
47 00470 00521 

75 31340 [01566j 
11 74440 00440 

76 56043 77777 

11 01461 01736 
21 00451 00616 
15 00632 00627 
35 00640 10006 
11 00617 00644 
37 00604 00501 
41 00644 00570 
21 00627 00620 
11 00044 00644 
11 00641 10000 
37 00604 00506 
41 00644 00570 
21 00627 00607 
11 00044 00644 
37 00604 00512 
41 00644 00370 
21 00627 00607 
11 00044 00644 
37 00604 00516 
41 00644 00570 
21 00627 00621 
45 00000 00524 
75 10140 00470 



TEST WHETHER 

ACTIVATING 
RESTORE 

ES I > 
PAGE NUMBER 

STEP COMMAND 

PRESET VERTICAL POSITION 

PICKUP ADDRESS TO Q LEFT 

5 TO TALLY 

PRINT FIVE 

OCTAL DIGITS 
STEP HORIZONTALLY 
4 TO TALLY 
COMMAND TO Q 
PRINT FOUR 

OCTAL DIGITS 
«>TEP HORIZONTALLY 
4 TO TALLY 
PRINT FOUR 

OCTAL DIOITS 
STEP HORIZONTALLY 
4 TO TALLY 
PRINT FOUR 

OCTAL DIGITS 
STEP HORIZONTALLY 
JUMP 
CLEAR TRACE 



8- 122 



CON'. 



VN UK i.O CALK OMNIA 



Ly t C • w t L'.-li'v/ 



CV-11 



FLIP CHARACTkON TRACE 



PAGE.* 21 Of 100 • 
REPORT Jill Z4.9O 
MODEL All 

DATEAUgUSt 9, 1955 





71226 


522 


11 00040 77637 


DIN 




71227 


523 


75 31340 01566 


COMPARATOR 




tl230 


524 


11 0M40 00645 

"■rj; 


ZERO TO DECIMAL EXPONENT 




7f23l 


£25 


1*21 00*43 00074 


STEP. DECIMAL EXPONENT 

1 ; 




fi'232 


526 


14 30062 40642 


DIVIDE X-IY^lb 




71233 


527 


14 45062 2052SJ 


•COWPAflJE Wfjfyir ONE 




71234 


530 


T4 45062. ^0540. 


COMPARE"' WiTH ONE TENTH 




71235 


531 


23 00645 00074 


STEP DECIMAL EXPONENT 




71236 


532 


14 20062 40642 


MULTIPLY X BY TEN 




71237 


533 


47 0053&1 00540 
13 00007 10000 






71240 


534 






71241 


535 


75 10176 00243 






71242 


5^6 


12 10000 01601 






71243 


537 


21 10000 01776 






71244 


540 


14 51062 20642 


CONVERT 




. i71245 

* 


541 


54 00642 20001 


TO FIXED 




r 471 246 


542 


46 00543 00545 


SIGN 




71247 


543 


77 10000 00626 


TEST 




71250 


544 


33 20006 00000 


AND PRINT 

v 


•-H 


71251 

. 1 \ Y 


545 


'iiiitYi 
35 00631 10000 


ftduND' 


r- 1 
1 




71252 

/ ; 't 


546 


77 10000 00625 


PRINT DECIMAL POINT 


71253 


547 


'" 11 00667 00644 


SEVEN TO TALLY 




71254 


550 


1 37 00604 00551 


-jflRlNT SEVEN 




71255 


551 


41 00644 00572 


.. DECIMAL DIGITS 




71256 


552 


7iV:0S,6^5. 00614 


SHIFT EXPONENT 

1 , 




71*257 


553 


46 00554 00555 


SIGN 




71260 


554 


77 10000 00630 


TEST 




71261 


555 


12 20000 10000 


AND PRINT 
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MM NO E T I V 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



>*n oircn cAiiroRNi* 



Byi C» J» Swift 



CV-11 



FLIP CHARACTROil TRACE 



page- 22 of 100 

REPORT ZM U90 * 
MODEL All 
DATF-AUgUSt 9 # 1955 



I 

CO 



o 



on 



71262 


556 


71263 


557 


71264 


560 


71265 


561 


71266 


562 


71267 


563 


71270 


564 


71271 


565 


71272 


566 


71273 


567 


71274 


570 


71275 


571 


71276 


572 


71277 


573 


71300 


574 


71301 


575 


71302 


576 


71303 


577 


71304 


600 


71305 


601 


71306 


602 


71307 


603 


71310 


604 


71311 


605 


71312 


606 


71313 


607 


71314 


610 


71315 


611 



21 00627 00620 
37 00604 00572 
37 00604 00572 
75 20O04 00450J 
21 00625 00606 
00 00000 0000 
00 00000 0000 
00 00000 0000 
00 00000 0000 

00 00000 0000 

31 10000 00003 
45 00000 00574 

31 10000 00002 

32 10000 00001 
11 20000 10000 

34 20000 00063 

35 00605 00577 
ll\00650] 00037 

15 00627 00447 

16 00627 00447 
77' 10000 00447 
21 00627 00607 

45 00000 QoOtioJ 
11 00650 00447 
00 00000 00036 
00 00024 00000 
00 00000 05000 
00' 00000 04400 



STEP HORIZONTALLY 
piRIft? TWO 

DECIMAL DIGITS 
STEP 

VERTICALLY 



OCTAL DIGIT ENTRANCE 

DECIMAL DIGIT ENTRANCE 

REMAINDER TO Q 

CLEAR ACC AND SHIFT DIGIT 

SET COMMAND 

PLACE DIGIT 

SET 

POSITION 
PRINT DIGIT 
STEP HORIZONTALLY 
EXIT 

PROTOTYPE 
VERTKAL STEP 
HORIZONTAL STEP 
CHARACTR0N 

OPERATING 
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FORM NO E T I 1* 



CONVAIR: - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



By i C. J. Sv/ift 



CV-11 



FLIP CHARACTRON TRACE 



page ''723 of 100 

REPORT, ZU 14-90 
MODEL All 

DATE Augu*t 9, 1955 



I 

CO 



o 



X 

a. 



71316 


612 


00 


00000 06000 


CODES 


71317 


613 


00 


00000 00014 


12 


71320 


614 


00 


50756 00000 


—2. 3<* 

10 TIMES 2 


71321 


615 


00 


00753 01777 


POSITION FOR PAGE NUM8ER 


71322 


616 


00 


00003 00000 


INCREMENT 


71323 


617 


00 


00000 00005 


5 


71324 


620 


00 


00050 00000 


INCREMENTS 


71325 


621 


00 


00074 00000 




71326 


622 


37 


7T7T7 30000 


ONE ROUNDED DOWN 


71327 


623 


31 


46314 13374 


ONE TENTH ROUNDED DOWN 


71330 


624 


24 


00000 00004 


10 


71331 


625 


30 


01150 00106 


DEC PT 


71332 


626 


40 


01120 00074 


MINUS 


71333 


627 


00 


00230 00074 


LOCATION 


71334 


630 


40 


01424 00074 


MINUS 


71333 


631 


00 


00000 12000 


ROUND 


71336 


632 


00 


00230 00000 


HORIZONTAL PRESET 


71337 


633 


00 


00000 00000 




71340 


634 


00 


00000 00000 




71341 


635 


00 


00000 00000 


T 


71342 


636 


00 


00000 00000 


E 


71343 


637 


23 


00620 00000 


M 


71344 


640 


33 


00644 00000 


P 


71345 


641 


01 


00666 00000 





71346 


642 


41 


00712 00000 


R 


71347 


643 


45 


00762 00000 


A , 


71350 


644 


43 


01006 00000 


R 


71351 


645 


14 


01032 00000 


I 



8-125 



CONVAIR- DIVISION Of GTW 

iA't OK GO. CALK 



dy* c. J. zvi&i 



CV'-ll 



FLIP CHARACTRON TRACE 



:orp. 



PAGE r.'Cll of 100 

REPORT, v«f J.QO . • 
MODEL ill 

DATE AuKUS *t 9^ 195 - 



71352 


646 


20 01056 00000 


E 


71353 


647 


22 01102 00000 


S 


71354 


650 


00 00000 00 


D 


71355 


651 


01 00000 ooooo 


I 


71356 


632 


02 ooooo ooooo 


<3 


71357 


653 


03 ooooo ooooo 


! 


71360 


654 


04 ooooo ooooo 


T 


71361 


655 


05 ooooo ooooo 


T . 


71362 


656 


10 ooooo ooooo 


A 


71363 


657 


11 ooooo ooooo 


6 


71364 


660 


12 ooooo ooooo 


u 


71365 


661 


13 ooooo ooooo 


e 


71366 


662 


00 ooooo ooooo 




71367 


663 


11 01701 30000 




71370 


664 


36 20000 72612 


Ct>EAR PA($E NUMBER 


71371 


•665 


17 00000 71316 


MOVE A PAGE 


71372 


666 


23 00674 72500 


TEST FOR OUTPUT 


71373 


667 


47 00440 00670 


SUBROUTINE 


71374 


670 


11 72612 20000 


TEST FOR 


71373 


671 


43 00673 00664 


NEW 


71376 


672 


47 00665 00440 


PAGE 


71377 


673 


00 00000 00200 


CONSTANT 


71400 


674 


75 30274 01100 


TEST COMMAND 


71401 


675 


75 30021 00666 


RESTORE 


71402 


676 


11 77027 01551 


Ftn IN ES 



8-126 



f OrtM NO. E T 1 '!*■ ' 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



CV-11 



PAGE 25 Of 100 

REPORT 2M1490 
MODEL 
DATE 



All 
1-15-56 



MAGNETIC TAPE STORAGE 





71500 


71500 


16 71543 


71562 


SET MANUAL EXIT 






71501 


71501 


11 71560 


00000 


SET Fl 






71502 


71502 


75 30036 


71504 


LOAD 






71503 


71503 


11 71506 


00001 


ES PART I 






71504 


71504 


75 30030 


00004 


LOAD 






71505 


71505 


11 ^71541 


01551 


ES PART II 






71506 


00001 


64 00001 


00000 


ROUTINE 






71507 


00002 


75 30034 


00001 


FOR 






71510 


00003 


11 00004 


30000 


RELOADING 






71511 


00004 


11 20000 


00037 


SAVE F AND L 






71512 


00005 


21 00006 


10000 


ADVANCE 






71513 


00006 


00 00001 


00000 


TAPE 






71514 


00007 


11 01571 


10000 


EXTRACTOR TO Q 


• 




71515 


00010 


53 00006 


00001 


SET 






71516 


00011 


53 20000 


01555 


TAPE 






71517 


00012 


53 20000 


01565 


COMMANDS 






?1520 


00013 


15 00037 


01553 


SET 






71521 


00014 


54 00037 


10025 


COMMANDS 






71522 


00015 


54 0Q&37 


00071 


FOR PICKUPS 






71523 


00016 


16 2000a. 00003 


AND STORE 






71524 


00017 


31 1000Q 


00063 


COMPUTE 






71525 


00020 


11 2000$ 


00004 


TALLY 






71526 


00021 


23 00004 


00032 


FOR , 




r-i 


71527 


00022 


36 00037 


00004 


TAPE 




1 

CO 


71530 


00023 


73 01575 


01577 


BLOCKS 




6 




71531 


00024 


34 01575 


00017 


COMPUTE REMAINDER 






71532 


00025 


13 20000 


01576 


STORED FROM LAST 


BLOCK 




71533 


00026 


21 10000 


00033 


SET 






71534 


00027 


31 20000 


00017 


BACKUP 






71535 


00030 


35 00006 


01571 • 


COMMAND 






71536 


00031 


45 00000 


01552 


, JUMP 






71537 


00032 


00 00000 


00033 


27 
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CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



ftAN OltOO. CALIFORNIA 



cv-n 



PAGE 26 of 100 

REPORT ZM 490 
MODEL AH 
DATE 1-15-56 



MAGNETIC TAPE STORAGE 





71540 


00033 


00 


00001 


00003 


♦ 




71541 


01551 


23 


00002 


01576 


CHANGE LAST BLOCK STORAGE 




71542 


01552 


75 


30034 


01554 


LOAD BLOCK OF 




71543 


01553 


11 


30000 


00004 


INFORMATION 




71544 


01554 


16 


01573 


00000 


SET Fl 




71545 


01555 


65 


00001 


00000 


DUMP MT 




71546 


01556 


21 


01553 


01574 


STEP 




71547 


01557 


21 


00003 


01575 


COMMANDS 


• 


71550 


01560 


41 


01577 


01552 


INDEX TALLY 




71551 


01561 


37 


01561 


01551 


SWITCH 




71552 


01562 


75 


30004 


01564 


SET AND 




71553 


01563 


11 


01570 


00001 


DUMP 




71554 


01564 


16 


01573 


00000 


TRAILER 




71555 


01565 


65 


00001 


00000 


BLOCK 


* 


71556 


01566 


75 


30030 


00002 


RESTORE 




71557 


01567 


11 


77027 


01551 


FLIP 


* 


71560 


01570 


45 


00000 


01624 


F2 FOR TRAILER BLOCK 




71561 


01571 


00 


30000 


00000 


BACKUP COMMAND 




71562 


01572 


37 


ti$62 


00004 


EXIT f 




71563 


01573 


57 


77777 


00002 


MANUAL ENTRANCE STOP 




71564 


. 01574 


00 


00034 


00000 


CONSTANTS 




71565 


01575 


00 


00000 


00034 






71566 


01576 


00 


00000 


00*0 


TEMPORARIES 




71567 


01577 


00 


00000 


0000 




■-4 

t-i 

1 

CO 

ci 




r- 

X 
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■;M NO C T. ■ 1 



cOi.vAiu — ojvii;;j;-4 or- cl?-. 



!j-.ti.'./.;scs- cor:?. 



:*i. If OHM* 



cv-u 



2? of ICO 

in 1+90 



PAGE 
REPORT 
MODEL AH 

DATE 1-15-56 



INTEGRATE DIFFERENTIAL EQUATIONS 





71600 


01000 


37 


00000 


71601 


BASIC SUBROUTINE 




71601 


71601 


11 


00040 


00002 


SAVE 




71602 


71602 


16 


00000 


00002 


LOCATION 




71603 


71603 


11 


00013 


00003 


SAVE X AND Y ADDRESSES 




71604 


71604 


75 


30025 


71606 


LOAD SUBROUTINE 




71605 


71605 


11 


71646 


00013 


INTO TEMPORARIES 




.71606 


71606 


75 


20004 


71610 


MODIFY V 




• 71607 


71607 


21 


00014 


00002 


ADDRESSES 




71610 


71610 


21 


00024 


00002 


WITH LOCATION 




'71611 


71611 


21 


00026 


00002 


MODIFY 




71612 


71612 


21 


00027 


00002 


Y 




71613 


71613 


21 


00032 


00002 


ADDRESSES 




71614 


71614 


21 


00035 


00002 


WITH 




71615 


71615 


21 


00037 


00002 


LOCATION 




71616 


71616 


31 


00002 


00017 


MODIFY U 




71617 


71617 


35 


00024 


00024 


ADDRESS WITH LOCATION 




71620 


71620 


16 


00003 


00002 


MODIFY SUBROUTINE 




71621 


71621 


71 


00075 


00002 


REFERENCES WITH 




71622 


71622 


35 


00036 


00036 


Y ADDRESS 




71623 


71623 


54 


00003 


00071 


MODIFY SUBROUTINE 




71624 


71624 


21 


00023 


00003 


ADDRESSES 




71625 


71625 


21 


00033 


00003 


WITH 




71626 


71626 


21 


00034 


00003. 


X ADDRESS 




71627 


71627 


54 


00003 


00014 


MODIFY SUBROUTINE 




71630 


71630 


21 


00023 


00003 


ADDRESSES 


r— 1 

r-t 

1 


71631 


71631 


21 


00027 


00003 


WITH 


CO 

<4 


71632 


71632 


21 


00035 


00003 


X ADDRESS 





r*-4 


71633 


71633 


31 


00003 


00003 


PICK 




71634 


71634 


15 


20000 


71635 


UP 


r\ 


71635 


71635 


31 


00000 


00000 


N-l 




71636 


71636 


35 


00074 


00002 


N 




71637 


71637 


35 


00023 


00023 • 


MODIFY 



8-129 



ISRA! 

ifOHN 



CO 



!;v-i.l 



i'^.Gi: ZO of. J 
fd:,°oi( r .£♦; h :(j 
MOOi:i. /^l.X 



I NT!- GRATE I) I FRIRCNT I AL uQUATIO 



71640 


71640 


31 


00002 


00001 


COMMANDS 


71641 


71641 


35 


00033 


00033 


WITH 


71642 


71642 


31 


00002 


00015 


QUANTITY 


71643 


71643 


35 


00027 


00027 


N 


71644 


71644 


75 


30002 


00013 


SHIFT 


71645 


71645 


11 


00015 


71714 


COMMANDS 


71646 


71646 


75 


30021 


71711 


LOAD PART OF 


71647 


71647 


11 


00016 


77777 


SUBROUTINE INTO PLACE 


71650 


7-1650 


75 


30016 


00001 


LOAD REMAINDER OF 


71651 


71651 


11 


71673 


00020 


SUBROUTINE INTO PLACE 


71652 


71652 


75 


30042 


00001 


SAVE EXIT 

* 


71653 


00000 


11 


01736 


,71716 


AND COUNTERS 


71654 


00001 


11 


00040 


01776 


CLEAR 


71655 


00002 


11 


00040 


01777 


COUNTERS 


71656 


00003 


14 


22000 


14002 


DELTA X TIMES YI EQUALS K 


71657 


00004 


47 


00005 


00015 


ZERO? 


71660 


00005 


11 


20000 


00036 


STORE K 


71661 


00006 


14 


22003 


62022 


K TIMES BJ 


71662 


00007 


14 


23400 


22026 


PLUS Q2 TIMES CJ 


71663 


00010 


11 


20000 


00037. 


STORE INCREMENT 


71664 


00011 


14 


03003 


70037 


THREE TIMES INCREMENT 


71665 


00012 


14 


23003 


62032 


PLUS K TIMES AJ 


71666 


00013 


14 


00177 


44002 


ADDED TO QI 


71667 


00014 


14 


00003 


74002 


ADD INCREMENT TO YI 


71670 


00015 


14 


40000 


00003 


INDEX N-l 


71671 


00016 


37 


00001 


00002 


EXECUTE SUBROUTINE 


71672 


00017 


14 


44004 


30003 


INDEX 3 


71673 


00020 


75 


30042 


01735 


RESTORE AND 


71674 


00021 


11 


71716 


01736 


EXIT 


71675 


00022 


20 


00000 


00000 


C 


71676 


00023 


22 


57541 


46376 





71677 


00024 


3 3 


24047 


46001 


N 



0-1 30 



FQl!M NO £ T I ■)', T 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN OIECO CALIFORNIA 



CV-11 



page 29 of 100 

REPORT ZM U90 
MODEL All 
DATE 1-15-56 



t 

CO 



o 



X 

Oh 



INTEGRATE DIFFERENTIAL EQUATIO 



71700 


00025 


25 


25252 


52775 


S 


71701 


00026 


40 


00000 


00000 


T 


71702 


00027 


55 


20236 


31376 


■ A ! 


71703 


00030 


44 


53730 


32001 


N 


71704 


00031 


52 


52525 


25376 


T 


71705 


00032 


60 


00000 


00000 


S 


71706 


00033 


55 


20236 


31376 




71707 


00034 


44 


53730 


32001 




71710 


00035 


60 


00000 


00000 




71711 


71711 


11 


00036 


71713 


SHIFT COMMAND 


71712 


,71712 


37 


00017 


00017 


EXECUTE SUBROUTINE 


71713 


71713 


00 


00000 


00*0 


TEMPORARIES 


71714 


71714 


00 


00000 


00*0 


FOR 


71715 


71715 


00 


00000 


0000 


COMMANDS 



8-131 



*M NO C. T I -.1*1 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DICCJO CALIFORNIA 



CV-11 



PAGE JO Of 100 

REPORT ZM it90 

MODEL All 

DATE 1-15-56 



CARD TO PAPER TAPE 



71724 


71724 


17 


00000 


73376 


PICK FIrtST CARD 


71725 


1-112$ 

1 1 < \ » 


23 


06122 


00t22> 


LOAD 


71726 


fl726 


3.7 


74645 


76578 


\TLIP 


71727 


71727 


M 


57101 


70530 


READ FIRST' { CARD 


71730 


71730 


23 


70530 


00074 


N*l ' 
DONE ?' 


71731 


71731 


46 


71732 


71734 


71732 


71732 


37 


73374 


73374 


FINISH 


71733 


71733 


57 


00000 


00QD0 


OFF 


71734 


71734 


75 


30006 


71736 


SEPARATE ADDRESS 


71735 


71735 


73 


71765 


00002 


DIGITS AND N~l 


71736 


71736 


75 


20004 


71740 


ASSEMBLE 


fl737 


71737 


32 


00002 


00003 


ADDRESS 


71740 


7*740 


35 


00006 


71760 


IN CELL 


71741 s 


7*741 


16 


20000 


71756 


SET STORE 


71742 ' 


71742 


31 


20000 


00017 


COMPUTE 


71743 


ti>43 


15 


20000 


71760 


LAST 


71744 


7>t44 


21 


71760 


00007 


ADDRESS 


71745 


71745 


54 


00007 


10017 


SET BLOCK 


71746 


71746 


35 


71763 


71755 


TRANSFER FOR STORE 


71747 


71747 


11 


00007 


20000 


COMPUTE NUMBER . 


71750 


71750 


73 


71765 


00010 


OF REMAINING CARDS 


71751 


71751 


47 


71752 


71773 


NONE ? 


71752 


71752 


31 


00010 


00017 


READ 


71753 


71753 


35 


71763 


71754 


REMAINING 


71754 


71754 


14 


57000 


70537 


CARDS 


71755 


71755 


75 


30001 


71757 


STORE 


71756 


71756 


11 


70531 


30000 


RESULTS 


71757 


71757 


37 


71007 


71003 


PUNCH OUT 


71760 


71760 


00 


30000 


30000 


TAPE 


71761 


71761 


45 


00000 


71727 


RETURN 


71762 


71762 


14 


57000 


70537 


PROTOTYPE 


71763 


71763 


75 


30001 


71757 


COMMANDS 
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FORM NO E. T. • 1 (ft ■ F 



CUNVAIK — UIVftlUN CM- MtNfcKAL 0YNAMK.& COKP. 

SAN OIEOO. CALIFORNIA 



CV-11 



PAGE 31 f 10 

report ZM h90 

MODEL All 
DATE 1-15-56 



CARD TO PAPER TAPE 



71764 


71764 


00 


00000 


00*06 


71765 


71765 


00 


00036 


41100 


71766 


71766 


00 


00003 


03240 


71767 


71767 


00 


00000 


23420 


71770 


71770 


00 


00000 


01750 


71771 


71771 


00 


00000 


00144 


71772 


71772 


00 


00000 


00001 



10 TO THE SIXTH 

10 TO THE FIFTH 

10 TO THE FOURTH 

10 TO THE THIRD 

10 TO THE SECC0ND 

10 TO THE ZERO 



00 



o 
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*ORM NO C T I fi ■ r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP 



SAN DIEGO. CALirOftNIA 



CV-11 



PAGE 3a Of 100 

REPORT 2M 1^90 

MODEL All 

DATE 1-15-56 



BESSEL FUNCTIONS 





72000 


OHIO 


16 01122 


01735 


STOP TRACE 




72001 


01111 


11 00004 


00037 


SHIFT 




72002 


01112 


55 00037 


00006 


COMMAND CODE * 




72003 


01113 


45 00000 


01120 


JUMP 




72004 


01114 


75 30670 


72006 


SAVE 




72005 


01115 


11 OHIO 


75110 


ES 




72006 


01116 


75 30441 


OHIO 


LOAD 




72007 


01117 


11 72000 


01110 


THIS 




72010 


01120 


55 00037 


10042 


TEST 




72011 


01121 


44 01210 


01123 


ORDER 




72012 


01122 


00 00000 


01736 






72013 


01123 


45 00000 


01124 






72014 


01124 


16 00013 


75734 


SET STORE 




72015 


01125 


27 00005 


01772 


RESTORE SIGN 




72016 


01126 


11 00005 


01117 


OF X 




72017 


01127 


11 00005 


20000 


TEST 




72020 


01130 


14 45123 


01157 


RANGE 




72021 


01131 


11 01776 


OHIO 


SAVE AND CLEAR 




72022 


01132 


11 00040 


01776 


IND£X COUNTER 




72023 


01133 


14 21177 


41116 


COMPUTE 




72024 


01134 


14 30123 


21116 


POLYNOMIAL, 




72025 


01135 


11 00040 


20000 


FOR 




72026 


01136 


14 12111 


65240 


FUNCTION OF 

• 




72027 


01137 


14 40123 


11136 


FIRST 


w-i 


72030 


01140 


11 20000 


01115 


KIND (j) 


72031 


01141 


55 00037 


10043 


TEST FOR 


r-t 


72032 


01142 


44 01143 


01204 


OTHER FUNCTION 


X 


72033 


01143 


14 22111 


71233 


COMPUTE 


a, 


72034 


01144 


14 54177 


41774 


LOG 1/2 J (x) 




72035 


01145 


14 21111 


51114 


OVER " . 




72036 


01146 


14 30123 


41114 


1/2 PI 




72037 


01147 


11 00040 


20000 


COMPUTE 
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FORM NO S T ■ I ',('' 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN OICOO CALIFORNIA 



CV-11 



PAGE 33 Of 100 

REPORT ZM kQ0 

MODEL A11 

DATE 1-15-56 



BESSEL FUNCTIONS 





72040 


01150 


14 12111 


65247 


POLYNOMIAL. 




72041 


01151 


14 40123 


11150 






72042 


01152 


11 20000 


00037 


STORE Y 




72043 


01153 


14 00111 


40037 


FUNCTION 




72044 


01154 


45 00000 


01204 






72045 


01155 


00 00000 


00 






72046 


01156 


00 00000 


00 






72047 


01157 


11 00037 


oilii 


SET INDICATOR 




72050 


01160 


14 32111 


71230 


3 DIVIDED 




72051 


01161 


11 20000 


01116 


BY X 




72052 


01162 


11 00040 


20000 


COMPUTE FIRST 




72053 


01163 


14 12111 


65256 


POLYNOMIAL 




72054 


01164 


14 40123 


11163 


IN 




72055 


01165 


11 20000 


01112 


X/3 




72056 


01166 


11 '00040 


20000 


COMPUTE SECOND 




72057 


01167 


14 12111 


65265 


POLYNOMIAL 




72060 


01170 


14 40123 


11167 


IN 




72061 


01171 


11 20000 


01114 


X/3 




72062 


01172 


14 50111 


71113 


SQUARE ROOT OF X 




72063 


01173 


14 30111 


31112. 


COMPUTE 




72064 


01174 


14 04111 


41117 


FUNCTION 




72065 


01175 


14 61111 


71115 


OF FIRST 




72066 


01176 


14 20111 


2111$ 


KIND J 




% 72067 


01177 


55 01111 


10043 


TEST FOR 




72070 


01200 


44 01201 


01204 


OTHER FUNCTION 




'•72071 


01201 


14 60111 


70037 


SIN (COS) 


i-H 


72072 


01202 


14 20111 


20037 


TIMES POLYNOMIAL 


<4 



72073 


01203 


4 5 00000 


01204 


(reverse sign) 


72074 


01204 


11 01115 


20000 


STORE J 




72075 


01205 


11 OHIO 


01776 


RESTORE INDEX COUNTER 


04 


72076 


01206 


75 30670 


01734 


RESTORE ES 




72077 


01207 


11 75110 


OHIO 


AND EXIT 
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)RM NO E T ■ I f, f 



GONVAI 



,1- 



DIVISION OF GENERAL DYNAMICS CORP. 



SAN OIKOO CAUFCHNIA 



CV-11 



PAGE 5l+ Of 100 

REPORT ZU U90 

MODEL. All 

DATE 1-15-56 



BES5EL FUNCTIONS 



72100 


01210 


11 


01217 


01140 


CHANGES 


72101 


01211 


11 


01220 


01152 


FOR 


72102 


01212 


11 


01221 


01175 


SECOND 


72103 


01213 


11 


01222 


01201 


ORDER 


72104 


01214 


11 


01223 


01203 




72105 


01215 


75 


30036 


01123 




72106 


01216 


11 


01276 


01240 




72107 


01217 


14 


21111 


71115 


PROTOTYPE 


72110 


01220 


14 


31111 


70037 


COMMANDS 


72111 


01221 


14 


60111 


71119 




72112 


01222 


14 


61111 


70037 




72113 


01223 


27 


00037 


01772 




72114 


01224 


00 


00000 


00*0 




72115 


01225 


00 


00000 


00*0 




72116 


01226 


00 


00000 


00*0 




72117 


01227 


00 


00000 


00*0 




72120 


01230 


30 


00000 


00002 




72121 


01231 


00 


00000 


00006 




72122 


Q1232 


22 


00000 


00004 




72123 


01233 


20 


00000 


00000 




72124 


01234 


31 


10375 


52401 




72125 


01235 


00 


00000 


0000 




72126 


01236 


00 


00000 


0000* 




72127 


01237 


00 


00000 


0000 




72130 


01240 


33 


41467 


10363 


P ' 


72131 


01241 


57 


65777 


45770 





72132 


01242 


26 


60360 


01373 


U 


72133 


01243 


53 


60051 


15376 


Y , 


72134 


01244 


24 


17775 


63001 


N 


72135*- 


01245 


56 


00000 


50002 





72136 


01246 


37 


77777 


77777 


M 


72137 


01247 


57 


55704 


15364 


I 



8-136 



FORM NO E . T. - I (fl r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO, CALIFORNIA 



By C. J. Swift 



CV-11 



page 35 Of 100 

REPORT ZM U90 
MODEL All 
DATE 1-18-56 



BESSEl FUNCTIONS 



CD 

<i 

o 
o 



x 



72140 


01250 


21 


41603 


10370 


72141 


01251 


52 


13536 


72773 


72142 


01252 


20 


,14225 


71776 


72143 


01253 


50 


15233 


55777 


72144 


01254 


23 


30202 


76400 


72145 


01255 


27 


41111 


75776 


72146 


01256 


22 


76253 


35763 


72147 


01257 


50 


11126 


20765 


72150 


01260 


26 


37021 


41766 


72151 


01261 


47" 


04115 


32762 


72152 


01262 


51 


27014 


73370 


72153 


01263 


46 


12340 


02753 


72154 


01264 


31 


42042 


46400 


72155 


01265 


56 


16530 


25363 


72156 


01266 


23 


16241 


27764 


72157 


01267 


21 


57052 


60765 


72160 


01270 


52 


37270 


75767 


72161 


01271 


24 


56574 


01761 


72162 


01272 


. 25 


25175 


32773 


72163 


01273 


31 


10375 


52400 


72164 


01274 


00 


00000 


00 


72165 


01275 


00 


00000 


00-0 


72166 


01276 


27 


20362 


77757 


72167 


01277 


53 


13661 


55764 


72170 


01300 


22 


12104 


53770 


72171 


01301 


53 


60204 


30773 


72172 


01302 


32 


77770 


44775 


72173 


01303 


56 


00000 


12000 


72174 


01304 


37 


77777 


77776 


72175 


01305 


26 


65262 


11367 


72176 


01306 


53 


36051 


71773 


72177 


01307 


23 


77444 


00376 
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RM NO E. T I J" ■ r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



By i C J. Swift 



SAN DIEGO. CALIFORNIA 



CV-11 



PAGE 
REPORT 
MODEL 
DATE 



36 of 100 

All 

1-18-56 



BESSEL FUNCTIONS 



72200 


01310 


52 


73727 


73001 


72201 


01311 


21 


26 U 7 


15402 


72202 


01312 


34 


24112 


15375 


72203 


01313 


53 


50147 


60400 


72204 


01314 


45 


57405 


13763 


72205 


01315 


22 


47571 


71366 


72206 


01316 


53 


43660 


00367 


72207 


01317 


26 


32676 


11763 


72210 


01320 


20 


77533 


65372 


72211 


01321 


32 


13023 


04354 


72212 


01322 


31 


42042 


46400 


72213 


01323 


23 


07237 


04764 


72214 


01324 


45 


65760 


24765 


72215 


01325 


47 


50636 


3 3 36 5 


72216 


01326 


32 


10122 


54770 


72217. 


01327 


42 


30131 


30761 


72220 


01330 


40 


00040 


42774 


72221 


01331 


31 


10375 


52400 


72222 


01332 


00 


00000 


00*0 


72223 


01333 


00 


00000 


0000 


72224 


01334 


\l 


00005 


20000 


•* {#. Cm m* 


01335 


46 


76045 


01336 


72226 


01336 


42 


00073 


01354 


72227 


01337 


54 


00010 


00107 


72230 


01340 


43 


20000 


01344 


72231 


01341 


46 


01342 


01343 


72232 


01342 


35 


00074 


00010 


72233 


01343 


54 


00005 


00107 


72234 


01344 


11 


00005 


00006 


72235 


01345 


11 


00070 


00005 


72236 


01346 


31 


00006 


00042 


72237 


01347 


73 


00005 


00004 



u 
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FORM NO. E. T. ■ I J>1 ■ f 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN OIEGO. CALIFORNIA 



CV-11 



PAGE 37 Of 100 

REPORT ZM J4.9O 

MODEL JTJ.1 

DATE 1-18-56 



BESSEL FUNCTIONS 





72240 


01350 


54 


00005 


00107 




72241 


01351 


23 


10000 


00005 




72242 


01352 


21 


00005 


00004 




72243 


01353 


44 


01346 


01354 




72244 


01354 


45" 


00000 


01721 




72245 


01355 


36 


00074 


00010 




72246 


01356 


13 


00005 


20000 




72247 


01357 


42 


00066 


01402 




72250 


01360 


36 


00066 


00006 




72251 


01361 


54 


00006 


00001 




72252 


01362 


11 


01377 


Q1364 




72253 


01363 


11 


00040 


00005 




72254 


01364 


21 


00005 


30000 




72255 


01365 


71 


20000 


00006 




72256 


01366 


54 


20000 


00045 




72257 


01367 


11 


20000 


00005 




72260 


01370 


21 


01364 


00074 




72261 


01371 


42 


01400 


01364 




72262 


01372 


54 


00005 


00101 




72263 


01373 


71 


00010 


01403 




72264 


01374 


35 


00005 


00005 




72265 


01375 


11 


00067 


00010 




72266 


01376 


45 


00000 


01401 




72267 


01377 


21 


00005 


01404 




72270 


01400 


21 


00005 


01414 


«4 

| 


72271 


01401 


45 


00000 


01721 


CO 

6 


72272 


01402 


45 


00000 


01737 



0- 

1— < 


72273 


01403 


00 


13056 


20577 


X 


72274 


01404 


77 


62620 


75765 


a, 


72275 


01405 


01 


11721 


41642 




72276 


01406 


74 


74607 


70746 




72277 


01407 


05 


27266 


02203 



8-139 



iRM NO. E. T. - I « r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN OieCO CALIFORNIA 



CV-11 



PAGE 33 f 100 

REPORT 2M i|90 

MODEL £11 

DATE 1.18-56 



BESSEl FUNCTIONS 



72300 


01410 


70 


22764 


23456 


72301 


01411 


12 


47414 


37545 


72302 


01412 


60 


00203 


77320 


72303 


01413 


37 


77774 


20006 


72304 


01414 


11 


01470 


00004 


72305 


01415 


45 


00000 


01417 


72306 


01416 


11 


00040 


00004 


72307 


01417 


23 


00010 


00056 


72310 


01420 


46 


01421 


76045 


72311 


01421 


35 


00053 


20000 


72312 


01422 


46 


01424 


01425 


72313 


01423 


00 


00000 


00036 


72314 


01424 


11 


00040 


00005 


72315 


01425 


36 


01423 


10000 


72316 


01426 


35 


01466 


01427 


72317 


01427 


11 


00010 


10000 


72320 


01430 


44 


01431 


01432 


72321 


01431 


11 


20000 


20000 


72322 


01432 


73 


01476 


10000 


72323 


01433 


35 


00004 


20000 


72324 


01434 


11 


00066 


00004 


723 25 


' 01435 


42 


01470 


01441 


72326 


01436 


55 


00004 


00001 


72327 


01437 


36 


01467 


20000 


72330 


01440 


45 


01475 


01435 


72331 


01441 


54 


20000 


00043 


72332 


01442 


73 


01470 


00005 


72333 


01443 


71 


00005 


10000 


72334 


01444 


54 


20000 


00045 


72335 


01445 


11 


20000 


00006 


72336 


01446 


11 


00040 


00007 


72337 


01447 


15 


01440 


01453 



8-140 



FOXM NO «'. T I 



CONVAIIt - DIVISION OF GENERAL DYNAMICS CORP. 



SAN OltGO, CALIFOItNIA 



CV-11 



PAGE 39 of 100 

REPORT £f,J ^90 

MODEL AH 

DATE l-lC-56 



BESSEL FUNCTIONS 





72340 


01450 


11 


00044 


00010 




72341 


01451 


71 


00007 


00006 




72342 


01452 


54 


20000 


00045 




72343 


01453 


35 


01476 


00007 




72344 


01454 


23 


01453 


00073 




72345 


01455 


41 


00010 


01451 




72346 


01456 


71 


00007 


00005 




72347 


01457 


54 


20000 


00045 




72350 


01460 


11 


20000 


00005 




72351 


01461 


11 


00004 


10000 




72352 


01462 


44 


01463 


01464 




72353 


01463 


13 


00005 


00005 




72354 


01464 


11 


00074 


00010 




72355 


01465 


45 


00000 


01721 




72356 


01466 


54 


00005 


24110 




!72357 


01467 


14 


44176 


65200 




72360 


01470 


06 


22077 


32504 




72361 


01471 


31 


10375 


52202 




72362 


01472 


6,5 


52420 


76452 




72363 


01473 


01 


21464 


25731 




72364 


01474 


77 


73155 


46346 




72365 


01475 


00 


00117 


32757 




72366 


01476 


31 


10375 


52421 




72367 


01477 


44 


01605 


01334 


1— i 


72370 


01500 


27 


00005 


01772 


r-4 

CD 


72371 


01501 


44 


01502 


01675 


4 

O 


72372 


01502 


16 


01712 


01734 




72373 


01503 


44 


01504 


01657 


X 
Oh 


72374 


01504 


11 


01774 


00007 




72375 


01505 


45 


00000 


01657 




72376 


01506 


33 


00051 


00107 




72377 


01507 


35 


00012 


00012 



a-i4i 



-■M NO t" T ■ I V* 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



S.AN On.GO. CALIFOHN1A 



cv-ii 



page: J.q of 100 

REPORT ZV. k90 

MODEL A.11'.-^.,; 

DATE 1-1P-56 



BESSEL FUNCTIONS 



72400 


01510 


4 2 


00057 


01726 


72401 


01511 


45 


00000 


01607 


72402 


01512 


44 


01514 


01513 


72403 


01513 


44 


01516 


01515 


72404 


01514 


44 


01520 


01517 


72405 


01515 


44 


01522 


01521 


72406 


01516 


44 


01524 


01523 


72407 


01517 


44 


01526 


01525 


72410 


01520 


44 


01530 


01527 


72411 


01521 


44 


01414 


01416 


72412 


01522 


44 


01737 


01737 


72413 


01523 


44 


01737 


01737 


72414 


01524 


44 


01737 


01737 


72415 


0^525 


44 


01737 


01737 


72416 


01526 


44 


01737 


01737 


72417 


01527 


44 


01737 


01737 


72A2Q 


01530 


44 


01737 


01737 


72421 


01531 


44 


01737 


01737 


72422 


01532 


44 


01535 


01534 


72423 


01533 


44 


00700 


01737 


72424 


01534 


44 


01737 


01355 


72425 


01535 


44 


73400 


73000 


72426 


01536 


44 


01512 


01537 


72427 


01537 


44 


01546 


01540 


72430 


01540 


44 


01542 


01541 


72431 


01541 


44 


01545 


01543 


72432 


01542 


44 


01531 


01544 


72433 


01543 


44 


01571 


01556 


72434 


01544 


44 


01574 


01563 


72435 


01545 


44 


01737 


01552 


72436 


01546 


44 


01532 


01547 


72437 


01547 


44 


01533 


01477 



8-142 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP 

FORM NO E T. I 3 1 ) r 



SAM DIEGO CALIFORNIA PAGE I' \ of 100 

CV-11 REPORT 7.V.l$0 

MODEL All 

DATE 1-18-56 



BESSEL FUNCTIONS 

72440 01550 54 00005 00013 

72441 01551 23 00011 00057 

72442 01552 54 00005 20013 

72443 01553 43 20002 01550 



d> 

o 



X 

a* 



a- 143 



ORM NO E. T. • » OB- 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CAt-trOHNIA 



cv-ii 



page L2of 100 

REPORT ZUk30 

MODEL &11 

DATE 1-18-56 



CHARACTRON OUTPUT 





72444 


00774 


75 


31700 


72446 


SAVE 




72445 


00775 


11 


00100 


74100 


ES 




72446 


00776 


75 


30330 


01000 


LOAD 




72447 


00777 


11 


72450 


01000 


THIS 




72450 


01000 


31 


01736 


00017 


PICK 




72451 


01001 


15 


20000 


01306 


UP 




72452 


01002 


21 


01306 


01227 


ClOMMAND 




72453 


01003 


42 


01230 


01005 


FROM 




72454 


01004 


- 23 


01306 


01231 


PROPER 




72455 


01005 


15 


20000 


01006 


P^ACE 




72456 


01006 


11 


30000 


00002 


ON M0 




72457 


01007 


31 


00002 


00017 


SET DATA 




7246Q 


01010 


15 


20000 


01306 


PICKUP 




72461 


01011 


21 


01306 


01231 


COMMAND 


-~ 


72462 


01012 


42 


01230 


01014 


FROM 


-" 


72463 


01013 


23 


01306 


01231 


PROPER PUCE 




72464 


01014 


15 


20000 


01125 


ON MD 




72465 


01015 


55 


00002 


10025 


EXTRACT 




72466 


01016 


51 


00045 


00003 


M 




72467 


01017 


55 


10000 


00036 


TEST 




72470 


01020 


44 


01021 


01022 


L 




7.2471 


01021 


54 


00003 


00005 


32 TIMES M TO N 




72472 


01022 


11 


01232 


20000 


TEST 




72473 


01023 


47 


01310 


01042 


L 




72474 


01024 


00 


00000 


00*0 




r- < 


72475 


01025 


44 


01030 


01026 


TEST TO SKIP COLUMN REMAINDER 




72476 


01026 


32 


01235 


00103 


MOVE TO 


4 

O 


72477 


01027 


31 


20000 


00005 


NEXT COLUMN 


s 


72500 


01030 


45 


00000 


01035 


JUMP 


a- 


72501 


01031 


32 


00043 


00106 


MOVE TO 




72502 


01032 


31 


20000 


00002 


NEXT ROW 


\ 


72503 


01033 


44 


01035 


01034 


TEST TO SKIP ROW 



8-144 



FORM NO. E T ■ I if" r 



CONVAIR - DIVISION OF GENEI1AL DYNAMICS CORP. 



SAN DIFOO CALIFORNIA 



CV-11 



PAGE Mof 100 

REPORT 2M 1|90 

MODEL AH 

DATE X-18-56 



CHARACTRON OUTPUT 



4 

o 



0* 



72504 


01034 


32 


00044 


00000 


SKIP ROW 




72505 


01035 


11 


20000 


01232 


STORE L 




72506 


01036 


44 


01041 


01037 


TEST FOR NEW PAGE 




72507 


01037 


35 


00003 


20000 


TEST WHETHER DATA 




72510 


01040 


4 2 


01245 


01042 


WILL FIT PAGE 




72511 


01041 


37 


01075 


01052 


TURN PAGE 




72512 


01042 


-U 


01232 


20000 


DONE 




72513 


01043 


42 


01234 


01045 


PAGE? 




7251* 


01044 


37 


01075 


01052 


TURN PAGE 




72515 


01045 


41 


.00003 


01077 


DONE DATA? 




72516 


01046 


45 


00000 


01312 


JUMP 




72517 


01047 


00 


00000 


00140 


CONSTANT 




72520 


01050 


75 


31700 


01735 


RESTORE ES 




72521 


01051 


11 


7410O 


00100 


AND EXIT 




72522 


01052 


17 


00000 


01236 


START CHARACTRON 


(PAGE 


72523 


01053 


15 


01226 


01055 


PRESET PICKUP 


72524 


01054 


11 


00040 


00017 


SET POSITION 




72525 


01055 


11 


30000 


10000 


PICKUP TITLE CHARACTERS 


72526 


01056 


11 


01242 


00004 


SET TALLY 




72527 


01057 


51 


01243 


20000 


XTRACT CHARACTER 




72530 


01060 


55 


10000 


00006 


SHIFT CHARACTERS 




72531 


01061 


35 


00017 


20000 


ADD POSITION 




72532 


01062 


77 


10000 


20000 


PRINT 




72533 


01063 


21 


00017 


01244 


STEP POSITION 




72534 


01064 


41 


00004 


01057 


INDEX TALLY 




72535 


01065 


21 


01055 


00073 


STEP PICKUP 




72536 


01066 


42 


01241 


01055 


DONE 




72537 


01067 


21 


01233 


01246 


STEP PAGE NO. 




72540 


01070 


35 


01247 


10000 


ROUND PAGE NO* 




72541 


01071 


11 


01250 


00005 


LOCATE PAGE NO# 




72542 


01072 


a 


00041 


00004 


PRINT THREE 




72543 


01073 


37 


01226 


01214 


CHARACTERS 





DBM NO. E T, 1 V> t 



GONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN OIIGO. CALIFORNIA 



CV-11 



PAGE i|ij.0f 100 

REPORT ZM )490 

MODEL AH 

DATE l-lfj-56 



CHARACTRON OUTPUT 





72544 


01074 


11 


00040 


01232 


CLEAR L 




72545 


01075 


75 


10002 


30000 


STOP AND 




72546 


01076 


17 


00000 


01237 


MOVE FILM 




72547 


01077 


17 


00000 


01236 


START CHARACTRON 1 




72550 


01100 


55 


00002 


10014 


TEST 




72551 


01101 


44 


01102 


01111 


FORMAT 




72552 


01102 


54 


01232 


20106 


COMPUTE 




72553 


01103 


71 


20000 


01235 


HORIZONTAL 




72554 


01104 


35 


01251 


00005 


FORMAT 




72555 


01105 


31 


01232 


00042 


WORD 




72556 


01106 


31 


20000 


00075 


POSITION 




72557 


01107 


35 


00005 


00005 






72560 


OHIO 


45 


00020 


01120 


JUMP 




72561 


01111 


54 


01232 


20103 


COMPUTE 




72562 


01112 


31 


20000 


00027 


VERTKLE 




72563 


01113 


35 


01251 


00005 


FORMAT 




72564 


01114 


55 


01232 


10037 


WORD 




72565 


01115 


31 


10000 


00005 


POSITION 




72566 


01116 


34 


10000 


00051 






72567 


01117 


35 


00005 


00005 






72570 


01120 


75 


30003 


01122 


POSITION SIGNS 




72571 


0H21 


35 


01252 


00006 


AND DECIMAL PT# 




72572 


01122 


21 


01130 


00073 


STEP PICKUP FROM BIN 




72573 


01123 


42 


01255 


01127 


DONE BIN 




72574 


01124 


75 


30020 


01126 


PICKUP DATA 


r~4 
1 


72575 


01125 


11 


30000 


00020 


INTO BIN 


CO 

& 

O 


72576 


01126 


15 


o*no 


01130 


RESET PICKUP FROM BIN 


72577 


01127 


21 


01125 


00073 


STEP PICKUP * 




72600 


01130 


11 


30000 


00011 


PICKUP FROM BIN 


a< 


72601 


01131 


54 


00011 


10034 


SEPARATE 




72602 


01132 


54 


10000 


00054 


EXPONENT 


V 


72603 


01133 


23 


20000 


01256 


$*120 TO SI 



8-146 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



FORM NO E T I T 



SAN DIEGO. CALIFORNIA 



CV-11 



PAGE U5 of 100 

REPORT m l 490 

MODEL j^-q 

DATE 1-18-56 



CHARACTRON OUTPUT 





72604 


01134 


73 


01257 


00012 


DIVIDED BY 10 TO S2 




72605 


01135 


35 


01260 


01154 


SET SHIFT OF T PLUS 3 




72606 


01136 


71 


00043 


00012 


3XS2 PLUS 




72607 


01137 


35 


01261 


00013 


36 TO P 




72610 


01140 


15 


01164 


0U47 


PRESET MULTIPLY 




72611 


01141 


55 


00012 


00036 


SET S2 TO TEST DIGITS 




72612 


01142 


71 


00011 


01262 


N TIMES 




72613 


01143 


54 


20000 


00045 


R*'V 2 




72614 


01144 


11 


20000 


00011 


TO Nl 




72615 


01145 


55 


00012 


00001 


MULTIPLY 




72616 


01146 


44 


01152 


01147 


Nl 




72617 


01147 


7r 


30000 


00011 


BY R TO 




72620 


01150 


54 


20000 


00045 


THE MINUS S2 




72621 


01151 


11 


20000 


00011 


AND 




72622 


01152 


21 


01147 


00073 


STORE 




72623 


01153 


4 2 


01263 


01145 


AS N2 
Z t ' lS *N2 TO N2 




72624 


01154 


54 


00011 


20003 




72625 


01155 


47 


01156 


01176 


ZERO ? 




72626 


01156 


43 


20000 


01167 


OVERFLOW? 




72627 


01157 


21 


00013 


00074. 


STEP P 




72630 


01160 


54 


00011 


20003 


DIVIDE N2 




72631 


01161 


73 


01257 


00011 


BY 10 




72632 


01162 


2 3 


01154 


00043 


COMPENSATE SHIFT 




72633 


01163 


42 


01307 


01165 


RIGHT SHIFT 




72634 


01164 


45 


01264 


01154 


JUMP . 




72635 


01165 


35 


00077 


01166 


MAKE PROPER 


r-i 
1 


72636 


01166 


00 


00000 


00*0 


RIGHT SHIFT 




72637 


01167 


21 


20000 


20000 


SHIFT LEFT AND REMOVE SIGN 




72640 


01170 


46 


01171 


01173 


TEST SIGN 




72641 


01171 


13 


20000 


20000 


COMPLEMENT N2 


H4 


72642 


01172 


77 


10000 


00006 


PRINT MINUS 




72643 


01173 


35 


01247 


10000 


ROUND 



A_147 



FORM NO. E. T • 1 Cft r 



CONVAtft - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



cv-n 



PAGE It6 Of I'M 

REPORT ZM ij.90^ 

MODEL AH 

DATE 1-18-56 



CHARACTRON OUTPUT 



CO 

o 
o 






72644 


0117* 


31 


100QP 


00010 


OVER 




•72645 


01175 


43 


200QO 


01157 


; FL0W? 




72646 


01176 


11 


0127jl 


00004 


PR^T 6 




72647 


01177 


37 


012££ 


01214 


VftlJS 




72650 


01200 


77 


10000 


00010 


PRI44T iDEqjflftL p Ti 




72651 


01201 


71 


00013 


0127? 


SCALE P J#fP,.A 




72652 


01202 


46 


01203 


01205 


TEST SIGN 




72653 


01203 


13 


20000 


20000 


CHANGE SIGN 




72654 


01204 


77 


10000 


00007 


PRINT MINUS 




72&S5 


01205 


35 


01247 


10000 


ROUND TO Q 




72656 


01206 


21 


00005 


01273 


STEP POSITION , 




72657 


01207 


37 


01226 


01214 


PRINT 2 




726,60 


01210 


37 


01226 


01214 


DIGITS 




72&61 


01211 


17 


00000 


01237 


STOP CHARACTRON 




7266Z 


01212 


21 


01232 


00074 


STEP L 




72663 


01213 


45 


00000 


01042 


EXIT 




72664 


01214 


31 


10000 


00002 


10 Q * (DIGIT 




72665 


01215 


32 


10000 


00001 


TO A 




72666 


01216 


11 


20000 


10000 


REPLACE 




72667 


01217 


34 


20000 


00102 


REMAINDER 




72670 


01220 


42 


01274 


01222 


SHIFT 




72671 


01221 


32 


01275 


00000 


CORRECT 




72672 


01222 


32 


00005 


00000 


CHARACTRON CODE 




72673 


01223 


77 


10000 


20000 


PRINT DIGIT 




72674 


01224 


21 


00005 


01244 


STEP POSITION 




72675 


01225 


41 


00004 


01214 


DONE ALL 7 




72676 


01226 


45 


0U76 


30000 


EXIT 




72677 


01227 


00 


73777 


00000 






72700 


01230 


00 


76000 


00000 






72701 


01231 


00 


74000 


00000 






72702 


01232 


00 


00000 


00200 


L . POSITION INDEX OF 


WORDS 


72703 


01233 


77 


73716 


66217 


PAGE N0# 





8-148 



FORM NO C . T . ■ I J1 F 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEOO. CALIFORNIA 



CV-11 



PAGE hi of 100 

REPORT ?j y ^ 90 

MODEL £-q 

DATE I-I8-56 



CHARACTRON OUTPUT 





72704 


01234 


00 00000 


00200 






72705 


01235 


00 00000 


00037 






72706 


01236 


00 00000 


05000 


CHARACTRON 




72707 


01237 


00 00000 


04400 


OPERATE 




72710 


01240 


00 00000 


06000 


CODES 




72711 


01241 


11 01306 


ooooo 






72712 


01242 


00 00000 


00005 






72713 


01243 


7 7 00000 


ooooo 






72714 


01244 


00 00024 


ooooo 






72715 
72716 


01245 
01246 


00 00000 
00 04061 


00201 
11560 


llf*. 2 3t 




72717 


01247 


00 00000 


06554 






72720 


01250 


00 00764 


01777 






72721 


01251 


00 00040 


00040 , 






72722 


01252 


40 0175Q 


ooooo 






72723 


01253 


00 00264 


ooooo 






72724 


01254 


70 01530 


ooooo 






72725 


01255 


11 00040 


ooooo 






72726 


01256 


00 00000 


00170 






72727 


01257 


00 00000 


00012. 






72730 


01260 


54 00011 


10003 






72731 


01261 


00 00000 


00044 






72732 


01262 


05 24220 


44463 


R' n > 2~* 




•72733 


01263 


71 01271 


ooooo 




•-» 


72734 


01264 


25 71230 


64027 


r" 


t— 1 

1 

CO 


72735 


01265 


32 36041 


57154 


R* 


<4 

o 


72736 


01266 


35 06512 


24172 


R* 


c> 

•-4 


72737 


01267 


36 41100 


ooooo 


« 2. 

R 


X 


72740 


01270 


37 20000 


ooooo 


R' 




72741 


01271 


00 00000 


00006 






72742 


01272 


00 50753 


41100 






72743 


01273 


00 00050 


ooooo 





8-149 



FOHM NO t T t T) r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



cv-n 



PAGE JUS Of 100 

REPORT ZM I49O 

MODEL All 

DATE 1-1H-S6 



CHARACTRON OUTPUT 



H 



72744 


01274 


06 


00000 


00000 


72745 


01275 


02 


00000 


opooo 


72746 


01276 


77 


77777 


• yj <**•■»» 


72747 


01277 


77 


77777 


77777 


72750 


01300 


77 


77777 


77777 


72751 


01301 


23 


33014 


17777 


72752 


01302 


00 


50454 


15045 


72753 


01303 


77 


■» •** w* **y *« 


77777 


72754 


01304 


77 


77777 


77777 


72755 


01305 


77 


77777 


77777 


72756 


01306 


00 


00000 


00*0 


72757 


01307 


54 


00011 


10000 


72760 


01310 


55 


00002 


10014 


72761 


01311 


44 


01031 


01025 


72762 


01312 


11 


01232 


20000 


72763 


01313 


55 


00002 


10014 


72764 


01314 


44 


01315 


01316 


72765 


01315 


36 


01323 


20000 


72766 


01316 


42 


01047 


01321 


72767 


01317 


44 


01321 


01320 


72770 


01320 


37 


01075 


01052 


72771 


01321 


75 


30002 


01050 


72772 


01322 


11 


01232 


72702 


72773 


01323 


-00 


00000 


00020 


72774 


01324 


00 


00000 


0000 


72775 


01325 


00 


00000 


0000 


72776 . 


Q1326 


00 


00000 


0000* 


72777 


01327 


00 


00000 


0000 



TITLE 



CHARAO 



TERS 



TEST FOR HORIZONTAL 
OR VERTICAL FORMAT 



8-150 



FORM NO. E. T. - 1 dl r 



r-i 

8 

O 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA PAGE 1+9 

CV--11 REPORT ZM i+90-H 

MODEL 
DATE 2-22-56 



FLIP CARD V./RITF 

73000 75 31700 7300'' STORE 

73001 11 00100 74100 F^ 
7300? 75 30307 001.no LOAD 

73003 11 73004 00100 THIS 

73004 00100 17 00000 0O077 PRIMF 

73005 00101 11 003 p <? 000 ?5 PRFSET TO 

73006 001.0? 11 00067 0O0?6 rr I0'- , T FIELDS 

73007 00103 75 10004 00105 CLEAR 

73010 00104 11 00040 onoo? CELLS 

73011 00105 16 01736 0000^ PICKU D 
7301? 00106 ?1 0P005 0^40^ 

73013 00107 4-? 00405 .10111 THI^ 

73014' 00110 23 00005 00404 

73015 00111 16 00005 0011? FLIP 

73016 0011? ?1 00004 3O0O0 C0Mf,'AN0 

73017 00113 16 00004 00 n 0^ C FT 

73020 00114 21 00005 00404 

73021 00115 42 0040 p . noil 7 

73022 00116 ?3 O0005 00404 PICKUP 

73023 00117 31 00005 '00017 

73024 00120 15 20000 00137 ADDRESS 

73025 00121 55 00004 10015 TEST 

73026 00122 44 00131 001?3 OPTION 

73027 00123 11 00074 00003 SET 

73030 00124 23 00026 00041 FOR 

73031 00125 23 00025 00073 SIX 

73032 00126 44 00131 001?7 Trj-j 

73033 00127 23 00025 00073 SET TO 

73034 00130 11 00041 00003 CMIT NUMBER 

73035 00131 55 00004 00025 SFT CARD 

73036 00132 51 00064 00005 COUNT 

73037 00133 47 0034? 00343 TEST NO CARDS 



rt_l <n 



FORM NO. E. T. - 1 (ft ■ r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



CV-11 



PAGE 50 

REPORT ZM 14-90-II 

MODEL 

DATE 2-22-56 



FLIP CARD WRITE 



H 
H 

CO 



Pm 



73040 


00134 


47 


00135 


00302 


TEST LAST 


CARD 


73041 


00135 


17 


00000 


00406 


PUNCH AND 


PICK 


73042 


00136 


75 


30010 


00140 


PICKUP 




73043 


00137 


11 


30000 


00011 


DATA 




73044 


00140 


21 


00137 


00025 


STEP 




73045 


00141 


75 


10044 


00143 


CLEAR 




73046 


00142 


11 


00040 


00407 


IMAGE 




73047 


00143 


11 


00026 


00010 


PRESETS 




73050 


00144 


11 


00364 


00023 


FOR 




73051 


00145 


11 


00365 


00024 


EACH 




73052 


00146 


15 


003 53 


00166 


CARD 




73053 


00147 


31 


00003 


00000 


TEST 




73054 


00150 


47 


00151 


00166 


FOR 




73055 


00151 


43 


00041 


00346 


OPTION 




73056 


00152 


21 


00166 


00073 


SEVEN FIELDS 


73057 


00153 


11 


00011 


20000 


TEST 




73060 


00154 


46 


00155 


00157 


CARD 




73061 


00155 


13 


00011 


00011 


NUMRER 




73062 


00156 


11 


00074 


00002 


SIGN 




73063 


00157 


31 


00011 


00000 


TEST 




73064 


00160 


42 


00374 


00162 


FOR 




73065 


00161 


11 


00374 


20000 


SI7E 




73066 


00162 


32 


00040 


00043 


CONVERT 




73067 


73067 


73 


00375 


20000 


NUMBER 




73070 


00164 


37 


00260 


00233 


PLACE IN 


IMAGE 


73071 


00165 


11 


00377 


00023 


SET PIT 




73072 


00166 


11 


30000 


00006 


PICKUP 




73073 


00167 


21 


00166 


00073 


STEP 




73074 


00170 


54 


00006 


10034 


CONVERT 




73075 


00171 


54 


10000 


00054 


NEGATIVE 




73076 


00172 


23 


20000 


00354 


R I NARY 1 


EXPONENT 


73077 


00173 


73 


00060 


00021 


AND 1 


BASE 



8-152 



FORM NO. E. T. - 1 (ft F 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



cv-ii 



PAGE 51 

REPORT ZM !|9G-II 
MODEL 
DATE 



H 

CO 

A 

a 

ON 
rH 

B 



FLIP 


CA\D V/k 


ITF 








73100 


00174 


35 


00372 


00217 


TO 2 


73101 


00175 


71 


00043 


00021 


EXP 10 


73102 


00176 


35 


00362 


00007 




73103 


00177 


16 


00353 


00212 


preset 


73104 


00200 


55 


00021 


00036 


FOR LOOP 


73105 


00201 


71 


00006 


00351 


CONVERT 


73106 


00202 


54 


20000 


00045 


FRACTION 


73107 


00203 


11 


20000 


00006 


ALSO 


731*10 


00204 


11 


00044 


00022 


SET INDEX 


73111 


00205 


44 


00206 


00210 


TEST AMD 


73112 


00206 


11 


00074 


00002 


SET FOR 


73113 


00207 


13 


00006 


00006 


SIGN 


73114 


00210 


55 


00021 


00001 


MULTIPLY 


73115 


00211 


44 


00215 


00212 




73116 


00212 


71 


00006 


30000 




73117 


00213 


5 4 


20000 


00045 


BY 


73120 


00214 


11 


20000 


00006 




73121 


00215 


21 


00212 


00074 




73122 


.00216 


41 


00022 


00210 


R EXP P 


73123 


00217 


30 


00000 


0000 


SHIFT 


73124 


00220 


47 


00221 


00225 


TEST ZERO 


73125 


00221 


42 


00230 


00233 


TEST NORMALIZED 


73125 1 

: i 


00222 


21 


00007 


00074 


NORMALIZE 


7312?. 


00223 


54 


00006 


20003 


IF 


731 3,0 f 

! 1 


00224 


73 


00060 


00006 


NECESSARY 


73131 1 . 


00225 


23 


00217 


00043 




7313'V 


00226 


42 


00373 


00231 


TRST RIGHT SHIFT 


73133' 

1 


00227 


45 


00000 


00217 


RETURN 


73134 ' 


00230 


37 


77777 


74512 


UNITY LESS ROUNDING 


73135 ! 

! 


; 00231 


3 5 


00077 


00232 


RIGHT 


73136 


\ 00232 


30 


00000 


0000 


SHIFT 


73137 


i or»233 


31 


20000 


00001 


SCALE 2 EXP 36 



8-153 



FORM NO. E. T. - 1 (R ■ r 



CONVAlR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



CV-11 



PAGE 52 

REPORT ZM 1490-11 

MODEL 

DATE 2-22-56 



FLIP CARD WRITE 



731^0 


00234 


35 


00371 


00006 


ROUND 


73141, 


00235, 


11 


00363 


00022 


SET INDEX 


73142' 


00236'! 


^'31 


00006 


00002 


PLACE 


73143 


00237, 


3 2 


00006 


00001 


BIT 


73144 


00240', 


: 11 


20000 


00006 


IN 


73145 


00241 


| 34 


20000 


00063 


IMAGE 


,73146 


00242 


35 


00024 


00243 


FOR 


'73147 


00243 


.30 


00000 


0000 


DIGIT 


73150 


00244 


'37 


00244 


00245 


SWITCH 


73151 


00245 


155 
1 


00023 


00043 


SHIFT BIT 


73152 


00246 


44 


00247 


00250 


TEST FIELD 


73153 


00247 


■ 21 


00024 


00366 


ADVANCE FIELD 


73154 


00250 


,37 


00250 


00251 


SWITCH 


73155 


00251 


41 


00022 


00236 


TEST END WORD 


73156 


00252 


31 


00002 


00000 


TEST 


73157 


00253 


47 


00254 


00256 


SIGN 


73160 


00254 


n 


00400 


20000 


AND 


73161 


00255 


37 


00244 


00242 


SET SIGN 


73162 


00256 


§5, 


00023 


00043 


SHIFT BIT 


73163 


00257 


11 


00040 


00002 


CLEAR 


73164 


00260 


37 


00260 


00261 


SWITCH 


73165 


00261 


ll 


00007 


20000 


TEST 


73166 


00262 


46 


00263 


00265, 


SIGN 


73167 


00263 


X ' 3 \ 


00007 
\00074 


00007 


AND 


73170 


00264 


ii 


00002 


SET SIGN 


73171 


00265 


n 


'00007 


00000 


EXP 


73172 


00266 


/73 


00060 
^0000 


10000 


OVER 


73173 


00267 


;n 


00007 


NINE 


73174 


00270 I 


' 31 


0,0003 

1 


00000 


TEST 


73175 


00271/ 


47 


00272 


00275 


OPTION 


73176 


00272, 


31 


1,0000 


00017 


SET EXP 


73177 


00273/ 


37 


00250 


00242 


FOR SIX 



8-154 



FORM NO. E T. - t M F 



CONVAIJ: - DIVISION OF GENERAL DYNAMICS CORP. 



C7-11 



PAGE 53 

REPORT ZJi i+90-11 

MODEL 

DATE 2-22-56 



r L!P CA n P V.'PTTP" 









7 3 2 00 


002 74 


4 5 


00000 


00307 


OPTION . 




73201 


00275 


5 5 


10000 


00042 


TEST FOR 




73202 


00276 


44 


00277 


00301 


12 ROW BIT 




73203 


00277 


11 


00400 


20000 


AND 




73204 


00300 


37 


00244 


00242 


PLACE IN 


IMAGE 


73205 


00301 


44 


00305 


00307 


TEST FOR 11 


ROW BIT 


73206 


00302 


17 


00000 


00304 


PUNCH WITHOUT PICKING 


73207 


00303 


45 


00000 


00136 


RETURN 




73210 


00304 


00 


00000 


00102 


CONSTANT 




73211 


00305 


11 


00401 


20000 


PLACE BIT 




73 212 


00306 


37 


00244 


00242 


IN IMAGE 




73213 


00307 


31 


00007 


00017 


PLACE LAST 




73214 


00310 


37 


00250 


00242 


DIGIT EXP 


IN IMAGE 


73215 


00311 


37 


00260 


00252 


DO SIGN 




73216 


C0312 


31 


00003 


00000 


TEST 




73217 


00313 


47 


00314 


00315 


OPTION 




73220 


00314 


55 


00023 


00043 


SKIP PERIOD 


POSITION 


73221 


00315 


41 


00010 


00166 


INDEX 




73222 


00316 


11 


00057 


00022 






73223 


00317 


31 


00003 


00000 


TEST 




73224 


00320 


47 


00321 


00327 


OPTION 




73225 


00321 


21 


00407 


00376 


PLACE 




73226 


00322 


21 


00421 


00376 






73227 


00323 


21 


00414 


00376 


PERIODS. 




73230 


00324 


21 


00423 


00376 






73231 


00325 


21 


00435 


00376 


IN 




73232 


00326 


21 


00430 


00376 


IMAGE 




73233 


00327 


16 


00367 


00334 


PRESET 




73234 


00330 


16 


00402 


00335 


COMMANDS 




73235 


00331 


15 


00367 


00332 


TO PUNCH 




j'73236 


00332 


55 


30000 


00010 


PICKUP 




73237 


00333 


77 


00000 


10000 


AND 





8-155 



FORM NO, E. T. • I (ft - F 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA 

07-11 



PAGE $+ 

REPORT ZM 1+90— II 

MODEL 

DATE 2-22-56 



. FLIP CARD WRITE 



, 73240 
73241 
73242 
73243 
73244 
73 24 5 
73246 
73247 
721250 
73251 
73252 
73253 
73254 
J73255 
J3^56 
,73257 
•73260 
173261 
(73J262 
(73263 
'' 73j264 
73265 
73266 
73267 
73270 
73271 
73272 
73273 
73274 
73275 
73276 
73277 



00334 
00335 
00336 
00337 
00340 
00341 
00342 
00343 
00344 
00345 
00346 
00347 
00350 
00351 
00352 
00353 
00354 
00355 
00356 
00357 
00360 
00361 
0036? 
00363 
00364 
00365 
00366 
00367 
00370 
00371 
00372 
00373 



77 10000 
77 10000 
23 00332 
2 3 003 34 
23 C0335 
41 00022 
41 00005 
11 00350 
75 31700 
11 74 100 
21 00350 
45 00000 
00 00000 
05 24220 
00 00010 
00 00011 
00 00000 
25 71230 
32 36041 

35 06512 

36 41100 

37 20000 
00 00000 
00 00000 
40 00000 
21 00411 
00 00014 
00 00452 
00 00000 
00 00000 
54 00006 
54 00006 



30000 
30000 
00073 
00074 
00074 
00332 
00134 
73254 
01735 
00100 
00074 
00160 

44463 
00000 
00355 
00170 
64Q27 
57154 
24172 
00000 
00000 
00044 
00*06 

00000 
00023 
00000 
00422 

ooni 

06554 
10003 
10000 



PUNCH 
DATA 
STEP 
ALL 

COMMANDS 
INDEX CARD 
INDEX GROUP CARDS 
RESTORE CARD NUMBER 
RESTORE 

ES 
STEP CARD 

NUMBER 
CARD NUMBER 
R EXP-12 TIMES 2 EXP-3 



R EXP 16 TIMES 2 EXP 35 
R EXP 8 TIMES 2 EXP 35 
R EXP 4 TIMES 2 EXP 35 
R EXP 2 TIMES 2 EXP 35 
R EXP 1 TIMES 2 EXP 35 



PROTOTYPE COMMAND 



8-156 



FORM NO. E. T. - 1 Ot ■ r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA 

CV-.11 



PAGE 55 

REPORT ZM I4.9O-II 

MODEL 2-22-56 
DATE 



FLIP CARD V.'RITF 



H 

H 

tA 
1 

o 
o 
o 

rH 
O 

B 



73300 


00374 


00 


00461 


13177 


9099999 


73301 


00375 


00 


00461 


13200 


10000000 


73302 


00376 


00 


10001 


00010 


PERIOD CONSTANT 


73303 


00377 


00 


04000 


00000 




73304 


00400 


77 


77776 


77777 


11 ROW 


73305 


00401 


77 


77775 


77777 


12 ROW 


73306 


0040.2 


00 


00000 


00436 




73307 


,00403 


00 


00000 


73777 




73310 


00404 


00 


00000 


74000 




73311 


00405 


00 


00000 


76000 




73312 


00406 


00 


00000 


00112 





8-157 



FORM NO. E. T. • I (ft ■ f 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



i;<:-n 



PAC»E ^>6 

REPORT ZM I49O-II 

MODEL 

DATE 2-22-56 



FLIP CA^n RE AH 



73400 




75 


31700 


7340? 


STORE 


73401 




11 


00100 


74100 


ES 


73402 




75 


30254 


00100 


ROUTINE 


73403 




11 


73404 


00100 


TO ES 


73404 


00100 


75 


10004 


00102 


CLEAR 


73405 


00101 


11 


00040 


00002 


TEMP 


73406 


00102 


16 


01736 


00004 


FLIP 


73407 


00103 


21 


00004 


00327 


COMMAND 


73410 


00104 


42 


00325 


00106 




73411 


00105 


23 


00004 


00324 


TO 


73412 


00106 


16 


00004 


00107 




73413 


00107 


21 


00003 


30000 


ACCUMULATOR 


73414 


00110 


16 


20000 


00004 


SET 


73415 


00111 


21 


00004 


00324 


STORAGE 


73416 


00112 


42 


00325 


00114 




73417 


00113 


23 


00004 


00324 


ORDER 


73420 


00114 


16 


00004 


00317 




73421 


00115 


55 


00003 


10015 




73422 


00116 


11 


00334 


00360 


NUMBER WORDS STORAGE 


73423 


00117 


11 


00067 


00357 


NUMBER-! 


73424 


00120 


44 


00131 


00121 


TEST OPTION 


73425 


00121 


11 


00074 


00002 


6 OPTION 


73426 


00122 


23 


00357 


00041. 


WITH 


73427 


00123 


23 


00360 


00074 


CARD 


73430 


00124 


23 


00316 


00073 


NUMBER 


73431 


00125 


37 


00125 


00126 




73432 


00126 


44 


00131 


00127 


TEST OPTION 


73433 


00127 


U 


00041 


00002 


WITHOUT 


73434 


00130 


37 


00125 


00123 


CARD NUMBER 


73435 


00131 


5 5 


00003 


00025 




73436 


00132. 


51 


00064 


20000 




73437 


00133 


43 


00040 


00322 


EXIT IF N IS 



8*153 



FORM NO. E. T. - 1 (ft 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA 

can 



PAGE 57 

REPORT 2M I#0-II 

MODEL 

DATE 2-22-56 



FLIP CARD READ 



H 
I 

to 

d> 

o 
t-\ 

ft, 



73440 


00134 


3 6 


00074 


on on a 


N-l 


7 3 441 


00135 


17 


00000 


.00 3 53 


READ AMD PICK READ CARD 


73442 


00136 


11 


00357 


00361 


SET INDEX 


73443 


00137 


11 


00330 


00006 


9 TO LINE DIGIT ■ 


73444 


00140 . 


16 


00337 


00313 


SET TEMPORARY STORAGE 


73445 


00141 


75 


1.0016 


0014? 


CL.FAR 


73445 


00142 


11 


00040 


00021 


MATRIX 


73447 


00143 


76 


00000 


00363 


READ 


73450 


00144 


76 


10000 


10000 


, ROW 


73451 


00145 


76 


10000 


00362 




73452 


00146 


54 


.00363 


00034 




73453 


00147 


"P 7 


00147 


00150 




73454 


00150 


.11 


00331 


00160 


SET INITIAL STORAGE 


73455 


00151 


11 


00333 


00017 


SET INDFX 5 


7 3456 


00152 


31 


00066 


00001 


2 EXP 35 TO A 


73457 


00153 


32 


000,40 


00006 


SHIFT 6 


73460 


00154 


44 


00155 


00156 


BIT ZERO TEST 


73461 


00155 


32 


00006 


00000 


ADD LINE DIGIT 


73462 


00156 


46 


0015.7 


00153 


DONE 6 DIGITS TEST 


73463 


00157 


11 


20000 


'20000 


CLEAR A LEFT 


73464 


00160 


30 


00000 


0000 


STORE MATRIX WORD 


73465 


00161 


21 


00160 


00073 


ADVANCE 


73466 


00162 


41 


00017 


00152 


6 TIMES 


73467 


00163 


37 


00163 


00164 




73470 


00164 


11 


00362 


10000 


. 


73471 


00165 


37 


00163 


00151 




73472 


00166 


11 


00363 


10000 




73473 


00167 


11 


00074 


00017 




73474 


00170 


37 


00163 


00152 




73475 


00171 


37 


00171 


00172 




73476 


00172 


23 


00006 


00074 


REDUCE LIME DIGIT 


73477 


00173 


46 


00174 


00143 


TEST FOR 11 ROW 



8-159 



FORM NO. E. T. - 1 <B • f 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



cy-11 



PAGE 



58 



REPORT ZM 1+90-1 

MODEL 

DATE 2-22-56 



FLIP CARD 9FAD 



HI 



o 

X 



73500 


00174 


11 


00336 


00006 


20 TO LIME DIGIT 


73501 


00175 


37 


00171 


00143 


11 ROW 


73502 


00176 


11 


00060 


00006 


10 TO LINE DIGIT 


73503 


00177 


37 


00147 


00143 


START 12 ROW 


73504 


00200 


31 


10000 


00001 


TEST FOR 


73505 


00201 


44 


00202 


00203 


FLAG 


73506 


00202 


13 


00074 


00004 


OVERRIDE INDEX 


73507 


00203 


55 


20000 


00043 




73510 


00204 


37 


00171 


00150 


FINISH 12 ROW 


73511 


00205 


11 


00004 


20000 


TEST FOR . 


73512 


00206 


42 


00074 


00210 


LAST CARD 


73513 


00207 


17 


00000 


00353 




73514 


00210 


11 


00332 


00355 


SET FOR WORD CHANGE 


73515 


00211 


15 


00331 


00231 


SET FOR EXTRACTION 


73516 


00212 


11 


00002 


20000 


TEST 


73517 


00213 


47 


00214 


00224 


OPTION 


73520 


00214 


37 


00244 


00224 


CARD NUMBER COMPUTED 


73521 


00215 


11 


00002 


20000 


TEST 


73522 


00216 


43 


00041 


00221 


OPTION 


73523 


00217 


11 


00017 


00007 


IDENT NUMBER USED 


73524 


00220 


21 


00313 


00074 


ADVANCE 


73525 


00221 


31 


00002 


00000 


TEST 


73526 


00222 


47 


00223 


00224 


OPTION 


73527 


00223 


37 


00232 


00226 


PERIOD 


73530 


00224 


11 


00332 


00354 


INDEX 6 


73531 


00225 


11 


00040 


00017 


CLEAR 


73532 


00226 


41 


00355 


00231 


TEST TO 


73533 


00227 


21 


00231 


00073 


CHANGE 


73534 


00230 


11 


00333 


00355 


MATRIX 


73535 


00231 


55 


30000 


00006 


WORD 


73536 


00232 


37 


00232 


00233 


POSITION DIGIT 


73537 


00233 


31 


00017 


00002 


X10 



8-160 



FORM NO. E. T. - 1 9) ■ r 



CONVAIR - DIVISION OF GENEllAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA 



PAGE 59 

REPORT ZV. 1*90-11 

MODEL 

DATE 2-22-56 



EL IP CARD READ 



1 

co 
1 

o 
o 

H 



73540 

73541 
73542 
73543 
73544 
73545 
73546 
73547 
735'50 
73551 
7355? 
73553 
73554 
73555 
73556 
73557 
73560 
73561 
73562 
73563 
73564 
73565 
73566 
73567 
73570 
73571 
73572 
73573 
73574 
73575 
73576 
73577 



C 2 3 4 
C0235 
00236 
00237 
00240 
00241 
00242 
00243 
00244 
00245 
00246 
00247 
00250 
00251 
00252 
00253 
00254 
00255 
00256 
00257 
00260 
00261 
00262 
00263 
00264 
00265 
00266 
00267 
00270 
00271 
002 7 2 
00273 



3 2 00017 
5 2 00064 
41 003 54 
°<7 00237 
37 00232 
51 00064 
47 00243 
13 00017 
37 00244 
11 00017 
11 00040 
11 00002 
47 00251 
37 00237 
37 00244 
71 000^0 
11 00040 

43 00040 

54 20000 
11 20000 
21 00017 
7 3 0004 3 
31 20000 

35 00342 
71 00060 

36 00343 
16 00344 
11 00044 

55 00017 
55 00017 

44 00273 
71 00020 



00001 
00017 
00226 
00240 
00226 
20000 
00244 
00017 
00245 
00020 
00017 
20000 
00252 
00226 
00226 
00340 
00356 
00313 
00060 
v 00020 
00341 
00017 
00017 
00301 
00017 
00354 
00273 
00356 
00036 
00001 
00276 
30000 



ADD 
DIGIT 



TEST 
FOR 
SIGN 



STORE N 

TEST 

OPTION 
EXP 6 OPTION 
BOTH OPTIONS 
CONVERT 
TO 

POSITIVE 
DECIMAL 
EXPONENT 

CHANGE 
TO BASE 

10 EXP 3 
CHANGE 

TO 



RASE 



8-161 



FORM NO. E. T. - 1 05 • r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA 



PAGE 60 

REPORT ZM U9CJ-3 

MODEL 

DATE O.PP^CA 



FLIP CARD ^FAD 



a 



ON 

El 

A* 



73600 


00274 


54 


20000 


004 5 




73601 


00275 


11 


20000 


000 20 


2 EXP 10 


73602 


00276 


21 


00273 


00074 




73603 


00277 


41 


00356 


00271 




73604 


00300 


11 


00074 


20000 




73605 


' 00301 


75 


00000 


00303 




73606 


00302 


71 


20000 


00060 




73607 


00303 


71 


20000 


00020 




73610 


00304 


54 


20000 


00010 




73611 


0030.5 


74 


20000 


00356 


NORMALIZE 


73612 


00306 


11 


20000 


00020 




73613 


00307 


11 


00352 


10000 




73614 


00310 


21 


00356 


00354 




73615 


00311 


53 


00020 


00356 


PACK 


73616 


00312 


35 


00005 


00005 


■SUM 


73617 


00313 


11 


00356 


30000 


TEMPORARY STORAGE 


73620 


00314 


21 


00313 


00074 


ADVANCE 


73621 


00315 


41 


00361 


00221 


END OF CARD 


73622 


00316 


75 


30010 


00320 


FINAL 


73623 


00317 


11 


00007 


30000 


STORAGE 


73624 


00320 


21 


00317 


00360 


ADVANCE 


73625 


00321 


41 


00004 


00136 


END TEST 


73626 


00322 


75 


31700 


01735 


RESTORE 


73627 


00323 


11 


74100 


00100 


ES 


73630 


00324 


00 


00000 


74000 




73631 


00325 


00 


00000 


76000 




73632 


00326 


00 


00000 


00777 




73633 


00327 


00 


00000 


73777 




73634 


00330 


00 


00000 


00 11 




73635 


00331 


35 


00021 


00021 




73636 


00332 


00 


00000 


"00*06 




73637 


00333 


00 


00000 


00 05 





0***JfcOtrfw 



FORM NO E. T. 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFOftNIA 



CV-11 



PAGE 6l 

REPORT ZM ^ 9QmlI 
MODEL 
DATE 



2-22-56 



LIP CARD READ 



73640 


00 33 4 


00 


00000 


00 10 


73641 


00335 


13 


00020 


0^020 


73642 


00336 


00 


00000 


00024 


73643 


00337 


00 


00000 


00 07 


73644 


OO34O 


22 


21147 


04413 


73645 


00341 


00 


00000 


00*47 


73646 


00342 


75 


00000 


00303 


73647 


00343 


00 


00000 


00210 


73650 


00344 


00 


00000 


00345 


73651 


00345 


25 


71230 


64050 


73652 


00346 


32 


36041 


57166 


73653 


00347 


'35 


06512 


24200 


73654 


00350 


36 


41100 


00000 


73655 


00351 


37 


20000 


00000 


73656 


00352 


77 


77777 


77400 


73657 


00353 


00 


00000 


00105 



R EXP-13X10 EXP-7X2 EXP 57 



R EXP 16 X 2 EXP 35 
R EXP 8 X 2 EXP 35 
R EXP 4X 2 EXP 35 
R EXP 2 X 2EXP 35 
R EXP 1 X 2 EXP 35 
EXTRACTION • 



CARD INSTRUCTION REPEAT 



iH 
I 

to 
o 

r-i 



73771 


16 75736 00002 


RESTART 


73772 


23 00002 00074 




73773 


16 20000 73776 


WITH 


73774 


75 31700 73776 


LAST 


73775 


11 74100 00100 


FLIP 


73776 


56 00000 30000 


COMMAND 



8-163 



FORM NO C T. ■ I W> ■ T 



CONVAIt - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



CV-11 



PAGE 65 

REPORT ZM U90-II 

MODEL 

DATE 2-20-56 



ALARMS OCTAL AND FLEXPRIMT SU^OUTINF * 



76000 


- 76000 


45 


00000 


76000 


76001 


76001 


16 


76026 


76022 


760O2 


76002 


11 


20000 


00000 


76003 


76003 


61 


00000 


76047 


76004 


76004 


55 


76012 


00005 


76005 


76005 


55 


76M2 


0O011 


76006 


76006 


55 


"*6012 


00012 


76007 


76007 


34 


20000 


00003 


>6010 


76010 


32 


76037 


00000 


76011 


76011 


It 


90000 


76012 


76012 


76012 


00 


01000 


10001 


76013 


76013 


44 


76014 


76007 


76014 


76014 


11 


10000 


76012 


76015 


76015 


61 


00000 


76021 


76016 


76016 


37 


76016 


76017 


76017 


76017 


31 


00000 


00044 


76020 


76020 


11 


76000 


00000 


76021 


76021 


•9 "* 


76016 


76004 


76022 


' 76022 


37 


76022 


76023 


76023 


76023 


31 


76000 


00017 


76024 


76024 


15 


20000 


760?* 


76025 


76025 


16 


76000 


00000 


76026 


76026 


15 


760*3 


7602*? 


76027 


76027 


16 


76027 


76000 


76030 


76030 


31 


76042 


00047 


76031 


76031 


37 


76016 


76047 


76032 


7603? 


41 


00000 


76033 


76033 


76033 


31 


20000 


00071 


76034 


76034 


37 


76016 


76005 


76039 


7603*5 


56 


00000 


OHO0O 


76036 


76036 


00 


U0000 


00 


76037 


76037 


61 


00000 


76037 



*S«« wltaup In ZM U9X 



8-a67 



FORM NO S T ■ I. )t' ' 



CGNVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO. CALIFORNIA 



CV-11 



PAGE 66 

REPORT ZM i^90-II 

MODEL - 

DATE 2-^0-56 



AtAQMY OCTAL ANf> *?L 



76040 


76040 


00 


00000 


00 5? 


76041 


76041 


00 


00000 


00*74 


76042 


76042 


43 


01130 


12070 


76043 


76043 


no 


00000 


00 64 


76044 


76044 


00 


v 00000 


00 62 


76045 


76045 


00 


00000 


00*66 


76046 


76046 


00 


00000 


00*72 


76047 


76047 


61 


00000 


7004.3 


76050 


76050 


34 


20000 


00006 


76051 


■.76051 


47 


76047 


76015 



FLIP ALARM ROUTINE 






76052 


76052 


61 


00000 


76047 


PRINT 


76053 


76053 


31 


76042 


00047 


OUT 


76054 


76054 


37 


76016 


76047 


ALARM 


76055 


76055 


31 


01736 


00017 


• SET 


76056 


76056 


34 


00073 


00000 


PtCKU? 


76057 


76057 


15 


20000 


76062 


COMMAND 


76060 


76060 


31 


20000 


00052 


PRINT 


76061 


76061 


37 


76016 


76005 


ADDRESS 


7606? 


7606? 


n 


30000 


00044 


PRINT 


76063 


76063 


37 


76016 


76004 * 


COMMAND 


76064 


76064 


31 


01774 


00044 


PRINT 


76065 


76065 


37 


76016 


76004 


R 


76066 


76066 


15 


00013 


76070 


SET PICKUP 


76067 


76067 


16 


00013 


76071 


COMMANDS 


76070 


76070 


31 


30000 


00044 


. PICK UP X 


76071 


76071 


27 


20000 


^0000 


PICKUP V 


76072 


76072 


37 


76022 


76002 


PRINT X AND Y 


76073 


76073 


31 


76104 


00044 


PRINT 


76074 


76074 


37 


76016 


76047 


OUT 



8-168 



FORM NO C T, ■• 1 <ft r' 



CONVAIR - DIVISION OP GEtHrRAl DYNAMICS CORP. 



•AN DIEOO CAtlfONNIA 



PAGE /& A 

REPORT ZJI 1|90 -II 

MODEL 

DATE 2-20-56 



CV-11 



FLIP ALARM ROUTINE 



76075 


76075 


31 01776 00071 


FIRST 


7607,6 


76076 


37 76016 76005 


INDEX 


76077 


76077 


31 76105 00044 


PRINT 


76100 


76100 


37 76016 76047 


OUT 


76101 


76101 


31 01777 00071 


SECOND 


76102 


76102 


37 76016 76003 


INDEX 


76103 


76103 


56 00000 01735 


HALT 


76104 


76104 


1406 2227 0452 


CONSTANTS 


76105 


76105 


1406 2227 0474 





REFERENCES TO ALARM ROUTINE 



72225 


72225 


46 


^605? 


01316 


72272 


72272 


45 


00000 


76052 


72310 


72310 


46 


01421 


76052 


76406 


76406 


46 


01607 


76052 


76507 


76507 


45 


00000 


76052 


76554 


76554 


46 


7605? 


01002 


77215 


77215 


45 


00000 


76052 


77366 


77366 


75 


20013 


76052 


77456 


77456 


46 


01003 


76052 


7 6 41 ' 


"TW-3 


in 


* r,. If -1 


a 3 *" 7 *i 


7lV'0 


71600 


17 


'f *J f P< h 


?i <ol 


7*645 


If (>-'><-•■ 


7 n 


■\^*)->>-. 


01774 



8~l68a 



POHM NO ET 1 ©-P 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN OIEGO DIVISION 



cv-ii 



PAGf - 67 of 100 

REPORT NO. 2M4j.90 
MODEL AH 

DATE 12/UtM 



62 Arc Tangent Subroutine 



6 

o 



a, 



76300 
76301 
76302 
76303 
76304 
76305 
76306 
76307 
76310 
76311 
76312 
76313 
76314 

76313 
76316 

76317 
76320 

76381 
76322 
76323 
76324 
76325 
76326 

763G7 
76330 
76331 
763*2 



01000 11 00040 &X)i2 

01001 23 00010 00074 

01002 46 01007 01003 

01003 13 00010 00010 
Q1004 31 00066 00042 

01005 73 00005 00005 

01006 27 00012 00062 

01007 21 00010 01043 

01010 46 01011 01012 

01011 U 00040 20000 

01012 35 01054 01013 

01013 [54 00005 50055] 

01014 71 00005 10000 

01015 54 20000 00046 

01016 11 20000 00006 

01017 U 00040 00010 

01020 15 01033 01023 

01021 In 00010 00006 

01022 54 20000 00046 

01023 35 [01044] OOOiO 

01024 21 01023 00073 
0r025 42 01034 01021] 

01026 71 00005 00010"} 

01027 54 20000 00045 S. 

01030 U 20000 00005 J 

01031 11 000*2 20000 

01032 47 01035 01040 




} 



Sex 



reverse O* ('/2(3yor tero) 
Sex -4- 27 
0»Scx 
-* Sex 

Scx-27 
x*2 



($ .® 




15 



-> P 
*r 1 



'• Iff + Ci 



® 



i-2 
donef 



■?■ i 



® 



01 & 



ft- 169 



FORM NO E T I ©-F 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 



CV-11 



76333 

76334 


01033 
01031* 


00 01044 00000 1 

35 01054 00000 J 


cons tftjita 


76335 


01035 


44 01036 01037 


Otx 1 


76336 


01036 


13 20000 20000 


-& l -? e l 


76337 


01037 


36 00005 00005 


$!-*/» ^ 


76340 


01040 


11 00074 00010 


1 *, 8CX 


76341 


01041 


16 00013 01734 


set order 


76342 


01042 


45 00000 01721 


exit 


76343 


01043 


00 00000 00053 


27. 


76344 


' 01044 


77 67545 00613 


c 15 


76345 


01045 


00 54613 12165 


°13 


76346 


01046 


76 15376 17035 


°11 


765W7 


01047 


03 05357 57500 


o 9 


76350 


01050 


73 43U6 35123 


c ? 


76351 


01051 


06 30402 45553 


Cc 


76352 


01052 


65 25317 10166 


c 3 


76353 


01053 


37 77777 25166 


c l 


76354 


01054 


54 00005 OOO55 


prototype order 



pAGt 68 of lOOJ 

REPORT NO ZM4+90 ' 

model \ All 

DATE 12/U/5U 



00 
I 

8. 

CK 

i-H 

« 

P4 



76721 76721 55 76300 03600 loader parameter 

63 ARC COTANGENT SUBROUTINE 

76356 01000 11 00062 00012 V* @—? Q l 

76357 01001 45 00000 01003 jump 



76723 76723 02 76356 00200 



leader parameter 



8-170 



FORM NO C T. ■ 1 Q} r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 

SAN DIEGO. CALIFORNIA 

cv-11 



EXPONENTIAL 



A 



© 



76360 
76361 
76362 
76363 
76364 
76365 
76366 
76367 
76370 
76371 
76372 
76373 
76374 
76375 
76376 
76377 
76400 
76401 
76402 
76403 
76404 
76405 
76406 
76407 
76410 
76411 
76412 



01000 
01001 
01002 
01003 
01004 
01003 
01006 
01007 
01010 
01011 
01012 
01013 
01014 
01013 
01016 
01017 
01020 
01021 
01022 
01023 
01024 
01025 
01026 

01027 
01030 
01031 
01032 




PAGE 


69 of 100 


REPORT 


ZM U90 


MODEL 


All 


DATE 


1-18-56 



23 20000 00067 SCX~7 TO ACC 

46 01003 01025 OUT OF RANGE? 
23 00005 00005 CLEAR X AND ACC 
42 01030 01002 TOO SMALL ? 

35 01032 01005 SET COMMAND 

34 00003 00111 X SCALED 2* r 

71 20000 01031 X 

54 20000 00045 TIMES 

11 20000 20000 LN 2 

73 01027 00010 INTEGER PART TO 00010 

31 20000 00042 FRACTIONAL PART DIVIDED 

73 01031 00011 BY LN 2 TO 00011 

21 00010 00067 STORE EXPONENT OF RESULT 

75 10003 01022 SET T* N» P 

11 01027 00005 TO UNITY 

73 00006 00007 DIVIDE BY Nt STORE IN TERM* T 

21 00005 00007 ADD TO TO POLONOMlALj P 

21 00006 01027 STEP N 

71 00011 00007 X TIMES TERM t T 

47 01017 01024 TERM ZERO YET? 

45 00000 0,1721 EXIT TO NORMALIZE 
11 00005 20000 NUMBER NEGATIVE 

46 01607 76045 OR POSITIVE 1 
00 20000 00000 UNITY SCALED 2 

77 77777 77734 -35 ' ■ 

27 05243 54513 LN 2 SCALED 2 

54 00005 00111 PROTO TYPE COMMAND 






8-171 



FOUM NO E T I <sn w 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN OlEaO CALIFORNIA 



cv-n 



page 7o 9 f 100 

REPORT 2M i+90 

MODEL All /. 

DATE 1-18-56 





INPUT SUM 


CHECK 


. 




* 
76414 


76414 


1 45 


00000 76575 


EMPTY 




76415 


76415 


53 


16045 07410 ) 


SUM ADJUSTER 




76416 


76416 


11 


76414 00000 


SET Fl 




76417 


76417 


23 


10000 10000 


CLEAR A AND Q 




76420 


76420 


75 


30040 76422 


LOAD PERMANENT 




76421 


76421 


11 


77716 00040 


CONSTANTS TO ES 




76422 


76422 


75 


12000 76424 


CLEAR TEMPORARY 




76423 


76423 


11 


10000 74000 


STORAGES 




76424 


76424 


75 


27777 76426 


SUM 




76425 


76425 


32 


70001 00000 


FLIP 




76426 


76426 


55 


20000 00000 


SUM TO Q AND A RIGHT 




76427 


76427 


47 


76440 76430 


TEST SUM 




76430 


76430 


31 


76453 00052 


PRINT 




76431 


76431 


37 


76452 76450 






76432 


76432 


31 


76454 00052 


FLIP 




76433 


76433 


37 


76452 76450 






76434 


76434 


31 


7*6455 00052 






76435 


76435 


37 


76452 76490 


OK 




76436 


76436 


56 


00000 70400 


HALT 




76437 


76437 


56 


00000 40000 


OBSOLETE 




76440 


76440 


31 


76456 00052 


PRINT 




76441 


76441 


37 


76452 76450 






76442 


76442 


31 


76457 00052 


NO 




76443 


76443 


37 


76452 76450 


60 


r-i 


76444 


76444 


56 


10000 70103 


HALT 





76445 


76445 


00 


00000 76436 


CONSTANT 


76446 


76446 


00 


00000 00**0 






76447 


76447 


00 


00000 00*0 




X 


76450 


76450 


61 


00000 20000 


PRINT 




76451 


76451 


34 


200Q0 00006 


SUB 




76452 


76452 


47 


76450 76436 


ROUTINE 




76453 


76453 


45 


47261 11415 


FLIP 



8*172 



FORM NO €. T. - 1 IV ' 



CONVAIR- DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



CV-11 



PAGE 71 Of 100 

REPORT 2MU90 

MODEL £11 

DATE 1-18-56 



INPUT $UM CHECK 

76454 76454 04 03365 74500 OK 

76455 76455 00 00000 00*0 EMPTY 

76456 76456 45 47020 60304 NO 

76457 76457 13 03025 70000 GO 



i 

CO 



© 

9- 



X 

a. 



8-173 



FORM NO E T ' ,Ji F 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 

CV-11 



PA^c. 



72 of 100 

REPORT NO 2M~h9Q 
MODEL Ji] 

DATE 12/llv 



5U LOGARITHM SUBROUTINE 



CO 



O 



X 
a, 



76462 


01000 


36 00074 00010 


^A A MWMMI^ U 


76463 


01001 


13 00005 20000 1 


rt • A 


7646lv 


01002 


42 00066 01025 J 


qju 


76465 
76466 


01003 

01004 


36 00066 00006 "] 
54 00006 00001 J 


. 2q-l -=9X (55) 


76467 


01005 


11 01022 01007 


1 
8 — 2> i 


76470 


01006 


11 00040 00005 


— ? L 


76471 


01007 


r£l 00005 (30000] 


Li-aj -? L 


76472 


01010 


71 20000 00006 ~~) 




76475 


01011 


54 20000 00045 > 


x -L -? L (3?) 


76474 


01012 


u 20000 00005 J 




76475 


01013 


21 01007 0O074 


i*»l —~ ^ £ 


76476 


01014 


42 01023 01007] 


0ii 


76477 


01015 


54 00005 00101 


h @} 


76500 


01016 


71 00010 01026 


p. In 2 -* R (2j 


76501 


01017 


35 00005 00005 


L-f-p.ln 2 — y q 


76502 . 


01020 


u 00067 00010 


7 — ^ P* 


76503 


01021 


45 00000 01024 


exit 


76504 


01022 


21 00005 01027 1 




76505 


01023 


21 00005 01037 J 


prototypes 


76506 


01024 


45 00000 01721 


normal exit 


76507 


01025 


45 00000 01737 


alarm exit 


76510 


01026 


00 13056 20577 


In 2 (26) 


76511 


01027 


77 62620 75765 


*8 



8-174 



?&nU NO E T t ®-F 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN ptEGO DIVISION 

cv-n 



PAG: 75 Of 10 

REPORT NO. OH*90 
MODEL All 



DATE 12/ 



9* 



CD 

© 



a, 



76512 


01030 


01 11721 M&2 


*7 


765U 


01031 


7U 7^607 707^6 


*6 


765IU 


01032 


05 27266 02203 


*5 


76515 


01033 


70 2276^ 23^56 


% 


76516 


0103^ 


12 WMk 375^5 


*3 


76517 


01035 


60 00203 77320 


*p 


76520 

1 


01036 


37 7777^ 20006 


ft l 


76705 


76705 


37 76^62 02U00 


* 

loader parameter 



8-175 



"ORM NO E T I .J|.F 



2 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION pA , ' Tfi nf lflfl 

SAN DIEGO DIVISION A ' + UX 1U M 

CV _ U REPORT NO ZM-^90 ' 

MODEL ^1^ 

12/11/5, 



DATE 12/HM 



50 SQUARE R^OT SUBROUTINE 

76553 01000 11 00005 20000 

7655V 01001 h6 76OU5 01002 

76555 01002 ^2 00075 01020 

76556 01003 5^ 00010 00107 

76557 0100U U3 20000 01010 

7656O 01005 ^6 01006 01007 

76561" 01006 35 0007^ 00010 

76562 01007 ^ 00005 00107 

76563 01010 11 00005 00006 

7656k oion u 00070 00005 

76565 01012 [31 00906 G00U2 

76566 01013 73 00005 0000U 

76567 01011* 5^ 00005 00107 
76570 01015 23 10000 00005 Jff-Xi-^Xi -* Q^AXi 

/ 76571 01016 21 00005 0000»v JH ■: XI + {dCi — * Xi + 1 

76572 01017 hk 01012J 01020 ^Xi,0 

76573 01020 U5 00000 01721 0I it 

76675 76675 21 76553 02000 loader parameter 



X — > A 




xtO 




2" 1 55 tx ( ie i6 


(x)« Of) 


*«**$ - 


8 CX 


sex odd? 




ecx»0 




«CX +■ 1 — ? SCX 




4 X y. X 




x — >N 




l-2~ 55 — * 


xi 


S» © — ? A 




Jh 4 Xi — ^ C, 


\ ® 


j Xi — mp A, t,_ 
5 


® 



8-176 



"fOBM HO € ^ I £-F 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN OJEGO DIVISION 



CV-11 



PAGE 75 Of 10^ 

REPORT NO 2M-4+90 
MODEL All 
DATE 10/15/& 





76575 


01537 




76576 


01540 




76577 


01541 




76600 


01542 




76601 


01543 




76602 


01544 




76603 


01545 




76604 


•. 01546 




76605 


01547 




76606 


01550 




76607 


01551 




76610 


01552 




76611 


01553 




76612 


01554 




76613 


01555 




76614 


01556 




76615 


01557 




76616 


01560 




76617 


01561 


*H 


76620 


01562 


r-i 

CD 


76621 


01563 




76622 


01564 




76623 


01565 




76624 


OI566 




76625 


OI567 




76626 


01570 




76627 


01571 



Transfer loader to ES 



Transfer Constants and Assembly to ES 



Requisition parameter Pj 



if (po -» e (t 5 ) 

* e. <t 3 ) 



Loader 
11 76655 00000 Preset F 
75 30061 01615 ") 
11 766OO 01542 
75 30062 01544 
11 77716 00040 
11 00122 00003 
11 00003 00004 
31 00004 00017 
11 20000 00005 
55 00003 00026 
11 01621 10000 
53 00003 01554 
75 30002 01555 
11 oijsoc? 00006 

15 00006 01576 

16 00004 01576 
55 00006 00011 
31 00005 00071 
52 01621 00122 
47 OI563 01601 
55 00006 00014 
11 01577 20000 
52 01621 01575 
16 00007 01571 ~\ 
55 00007 00025 / 

16 10000 01572 > Set subroutine referencea In Basio Code 

16 00004 [30000] J 



2 • OP - 

Mask p. q 

Set order t "requisition subroutine parameters" 

Requisition Subroutine Parameters Pi, Pp 
Set order 1 "Transfer subroutine to ES" 

Place parameter for assembly routine 

Is this thf termination flag;? 

Set repeat order j "Transfer subroutine to ES* 



8-177 



FORM NO E T l.fl-F 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 

cv-u 



PAGf 76of 1001 

REPORT NO ZM«-i*90 ' 
MODEL All 
DATE 10/15/5U 



00 



ft. 



76630 
76631 
76632 

76633 
76634 

76635 

76636 
76637 

76640 
76641 
76642 

76643 
76644 

76645 
76646 

76647 
76650 
76651 
76652 
76653 
76654 
76655 
76656 

76657 
76660 



hoooojj 




Stop to next subroutine 

Transfer Subroutine to ES 

Prototype order for 01575 
"Parameter for zero subroutine" 
Preset exit of Loader . 
Preset Fg 

obsolete order 
Modify subroutines 

Clear FLIP temporaries 
Transfer in Basic FLIP 



Obsolete 



Transfer Subroutine parameters to ES 

Exit order for Loader 
Extractor 
obsolete order 



8-178 



FOKM NO E T 1 J,-F 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION } 



CV-11 



COMMAND CODE PARAMETERS 



PAGE 77bf 10( 

REPORT NO 2IM-U90 
MODEl 
DATE 



L / All 

12/1V& 



CD 



O 



X 

ft* 



76661 


0170* 


01 01731 00000 


hz 


76662 


01705 


00 00003 00003 




76663 


01706 


' 72 77352 05000 


to 


7666* 


01707 


00 77023 00003 


A 


76665 


01710 


01 01731 00000 


hh 


76666 


01711 


00 00003 00003 




76667 


01712 


01 01731 00000 


h5 


76670 


01713 


00 00003 00003 




76671 


0171* 


01 01731 00000 


U6 


76672 


01715 


00 00003 77007 




76673 


01716 


01 01731 00000 


hi 


7667* 


01717 


00 77007 00003 




76675 


01720 


21 76553 02000 


50 


76676 


01721 


00 00003 77026 




76677 


01722 


2* 7636O 00500 


51 


76700 


01725 


00 00003 00003 




76701 


0172* 


02 77*50 00200 


52 


76702 


01725 


00 00003 77011 




76703 


; 01726 


70 77262 03*00 


53 


7670* 


01727 


00 77011 00003 




76705 


01730 


37 76*62 02*00 


% 


76706 


01731 


00 00003 77012 




76707 


01732 


01 01731 00000 


55 


76710 


01735 


00 77012 00003 




76711 


0173* 


01 01731 00000 


56 


76712 


01735 


00 00003 77013 




76713 


01736 


01 01731 00000 


57 


7671k 


01737 


00 77013 00003 




7671*5 


M_7li0 


61 77U«& 0^700 


£, 



0-179 



»»»-----*• *-- 


* ■* -»-«» ,* »-*•»- wf- -» 




"V'"' ~~ 




FORM NO 6 T ■ 1 (ghF 




CONSOLIDATED VULTEE AIRCRAFT CORF 

SAN DIEGO DIVISION 

cv-11 




7671^ 


017*1 


00 00003 76777 






167X1 


017*2 


02 77*52 00200 


61 




7672Q 


017*3 


00 76777 00003 




1 


7672I 


Qifkk 


55 76300 03600 


62 




' 76722 / 


017*5 


00 00003 77000 




j 


76723 


017*6 


02 76356 00200 


63 


< 


7672* 


017*7 


00 77000 00003 






76725 


01750 


01 01731 00000 


6k 




76726 


01751 


00 00003 77001 






76727 


01752 


01 01731 00000 


65 




76750 


01753 


00 77001 00003 






76731 


0175* 


01 01731 00000 


66 




76732 


01755 


00 00003 77002 






76733 


01756 


01 01731 00000 


67 




7673* 


01757 


00 77002 00003 






76735 


01760 


51 76360 01200 


70 




76736 


01761 


00 00003 77003 




1 
1 ■ 


76737 


01762 


01 01731 00000 


71 




767*0 


01763 


00 77003 00003 






767*1 


0176* 


01 01731 00000 


72 # 


p-f 


767*2 


OI765 


00 00003 7700* 




4 


767*3 


01766 


01 01731 00000 


75 


•< 


767** 


QI767 


00 7700* 00003 




1- 


767*5 


01770 


01 01731 00000 


Ik 




767*6 


01771 


00 00003 77005 






767*7 


01772 


01 01731 00000 


75 




76750 


01773 


00 77005 00003 






76751 


0177* 


01 01731 00000 


76 




76752 


01773 


00 00003 77006 






76733 


01776 


32 76521 03100 


77 




.7675* 


0*777. 


QQ 00003.77215, _ 





: m-^.r-c" 



PAGE "» 78 Of 100 

REPORT NOZVL~k90 
MOQEL All 

DATE 12/li 4 /& 



8-180 



FOltM NO, C. T 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO, CALIFORNIA 



CV-11 



page 79 f 10 o 

REPORT Zlf 14-90 

MODEL All 

DATE 1-18-56 





BASIC FllP 




■...■■•. 






76755 


01477 


44 


01605 01737 


SORT 




76756 


01500 


27 


00005 01772 


REVERSE SIGN Qf X 




76757 


01501 


44 


01502 01675 


STORE IN Y 




7676Q 


01502 


16 


01712 01734 


OR RZ 

* 




76761 


01503 


44 


01504 01657 


DECIDE TO 




76762 


01504 


11 


01774 00007 


ACCUMULATE 




76763 


01505 


45 


00000 01657 


JUMP 




76764 


01506 


33 


00051 00107 


-28 TO A 




76765 


01507 


35 


00012 00012 


-P TO T12 




76766 


01510 


42 


00057 01726 


11 : -P 




76767 


01511 


45 


00000 01607 


JUMP TO 2ERQ OUT 




76770 


01512 


44 


01514 0-1513 


S 




76771 


01513 


44 


01516 01515 


w 




76772 


01514 


44 


01520 01517 


I 




76773 


01515 


44 


01522 01521 


T 




76774 


01516 


44 


01524 01523 


c 




76775 


01517 


44 


01526 0152S 


H 




76776 


01520 


44 


01530 01527 


I 




76777 


01521 


44 


01737 01737 


N 




77000 


01522 


44 


01737 01737. 


G 




77001 


01523 


45 


00000 72004 


W 




77002 


01524 


45 


00000 72004 


H 




77003 


01525 


44 


01737 01737 


I 




77004 


01526 


45 


00000 01737 


F 


1-1 
1 


77005 


01527 


45 


00000 01526 


F 


CO 

<* 


77006 


01530 


44 


01737 01737 


L 






H 


77007 


01531 


44 


01737 01737 


E 


1*" 


77010 


01532 


44 


01535 01534 


T 


Cu 


77011 


01533 


44 


01737 01737 


R 




77012 


01534 


44 


72444 01732 


E 




77013 


01535 


44 


73400 73000 


E 




77014 


01536 


44 


01512 01537 





a- 181 



im no e t i C « 



CONV AIR - DIVISION OF GENERAL DYNAMICS CORP. 



lltfOO CAtlFOHNIA 



CV-11 



page so of itr 

report ZM1+90..H 

MODEL AH 

DATE 1-1P-56 



BAS 


IC FLIP 




-* 






77015 


01537 


44 


01546 


01540 




77016 


01540 


44 


01542 


Q1541 




77017 


01541 


44 


01545 


01543 




77020 


01542 


44 


01531 


01544 




77021 


01543 


44 


01571 


01^56 




77022 


01544 


44 


01574 


01563 




77023 


01545 


44 


01737 


01550 




77024 


01546 


44 


01532 


01547 




77025 


01547 


44 


01533 


01477 




77026 


01550 


11 


00011 


20000 


5CY MINUS ( 


77027 


01551 


36 


00060 


00010 


10 TO SC X 


77030 


01552 


54 


00005 


20044 


SHIFT X IN A 


77031 


01553 


45 


00000 


01722 


JUMP 


77032 


01554 


11 


00005 


20000 


IS X 


77033 


01555 


47 


01500 


01501 


zero! 


77034 


01556 


21 


01776 


00074 


STEP Bl 


77035 


01557 


36 


00005 


20000 


Bl*X 


77036 


01560 


42 


00074 


01602 


TEST 


77037 


01561 


11 


00040 


01776 


CLEAR Bl 


77040 


01562 


45 


00000 


01603 


EXIT 


77041 


01563 


27 


00005 


01772 


RESTORE SIGN X 


77042 


01564 


21 


01777 


00074 


STEP B2 


77043 


01565 


36 


00005 


20000 


B2-X 


77Q44 


01566 


42 


00074 


01602 


TEST 


77045 


01567 


11 


00040 


01777 


CLEAR B2 


77046 


01570 


45 


00000 


01603 


EXIT 


77047 


01571 


16 


01734 


00012 


INTERCHANGE 


77050 


01572 


16 


01736 


01734 


V AND EXIT 


77051 


01573 


16 


00012 


01736 


ADDRESSES 


77052 


01574 


23 


20000 


00011 


SCX-SCY 


77053 


01575 


46 


01602 


01576 


TEST 


77054 


01576 


47 


01603 


01577 


TEST 



(TALLY FOR TRACE) 



8-182 



FORM NO E T I 11 F 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEOO CALIFORNIA 



cv-n 



PAGE Q\ Of 100 

REPORT 2M 1+90 

MODEL All 

DATE 1*18-56 



CO 

6 

o 
o 



X 

a. 



BASIC FLIP 








77055 


01577 


12 00005 00005 


|X| 




77056 


01600 


12 00006 20000 


|Yf 




77057 


01601 


42 00005 01603 


TEST 




77060 


01602 


16 01734 01736 


CHANGE EXIT 




77061 


01603 


11 01774 20000 


RESTORE R 




77062 


01604 


45 00000 01735 


EXIT 




77063 


01605 


23 20000 00011 


SCX-SCY 




77064 


01606 


42 01765 01610 


TEST SHIFT 




77065 


01'607 


23 00006 00006 


CLEAR Y 




77066 


01610 


46*01737 01611 


LEFT SHIFT ? 




77067 


01611 


13 20000 20000 


SCX-SXY 




77070 


01612 


35 01773 01613 


SHIFT 




77071 


01613 


(54 00006 OOllOJ 


Y 




77072 


01614 


45 00000 01734 


EXIT 




77073 


01615 


11 00006 00007 


Y TO B 




77074 


01616 


31 01774 00034 


SCR TO A 




77075 


01617 


47 01620 01612 


ZERO J 




77076 


01620 


11 20000 00011 


SCR TO 




77077 


01621 


54 00011 00054 


SCY 




77100 


01622 


11 01774 00006 


R TO Y 




77101 


01623 


45 00000 01744 


EXIT TO MULTIPLY 




77102 


01624 


16 00000 01736 


STORE EXIT 




77103 


01625 


11 20000 01774 . 


STORE R 




77104 


01626 


31 00000 00017 


PICKUP 




77105 


01627 


35 01766 01630 


COMMAND 




77106 


01630 


11 [30000] 10000 


IN Q 




77107 


01631 


75 30005 01633 


DIVIDE COMMAND 




77110 


01632 


51 01760 00004 


IN PARTS 




77111 


. 01633 


47 01634 01640 


INDEX MODIFICATION 


REQUIRED? 


77112 


01634 


71 00005 01777 


PRODUCE 




77U3 


01635 


31 20000 00001 


INDEX 




77114 


01636 


72 00006 01776 


MODIFICATIONS 





\ 



ohm no e. t • i 9) r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



CV-11 



page 82 of 100 

REPORT ZM U90 

MODEL All 

DATE 1-16-56 





BASIC FLIP 












77115 


01637 


55 ?0000 


00031 


REQUIRED 


i 




77116 


01640 


32 00007 


00003 


PRODUCE 1 






77117 


01641 


11 20000 


00013 


PROPER ! 






77120 


01642 


54 00013 


10025 


ADDRESSES 






77121 


01643 


5 5 10000 


00014 


IN 






77122 


01644 


16 10000 


01734 


CELL 






77123 


01645 


16 10000 


00013 


00013 






77124 


01646 


55 10000 


00017 








77125 


01647 


15 10000 


01653 


SET Y PICKUP 






77126 


01650 


15 00013 


01652 


SET X PICKUP 






77127 


01651 


11 00040 


00007 


CLEAR B 






77130 


01652 


11 goooqj 


00005 


PICKUP 






77131 


01653 


11 (3oooq] 


| 00006 


OPERANDS 






77132 


01654 


55 00004 


00011 


DECIDE ON 






77133 


01655 


44 01554 


01501 


SIGN FOR X 






77134 


01656 


11 01774 


00006 


R TO Y 






77135 


01657 


31 00006 


00034 


UNPACK 






77136 


01660 


47 01662 


01661 


AND 






77137 


01661 


31 00066 


00001 


TEST 






77140 


01662 


11 20000 


00011 


Y FOR 






77141 


01663 


54 00011 


00054 


ZERO 






77142 


01664 


31 00005 


00034 


UNPACK 






77143 


01665 


47 01667 


01666 


AND 






77144 


01666 


31 00066 


00001 


TEST 




r-i 


77145 


01667 


11 20000 


00010 


X FOR 






77146 


01670 


54 00010 


00054 


ZERO 






77147 


01671 


55 00004 


00041 


IS THIS AN 




>-* 


77150 


01672 


44 01536 


01676 


ARITHMETIC 


COMMAND? 


X 


77151 


01673 


11 00005 


20000 


DIVIDING BY 






77152 


01674 


47 01740 


01737 


ZERO *l 






77153 


01675 


44 01656 


01657 


IS R AN OPERAND 1 




77154 


01676 


44 01677 


01700 


DECIDE 





8-184 



FORM NO C T I Jl r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



CV-11 



PAGE 83 Of IOC 

REPORT 25f 1|90 

MODEL AH 

DATE 1 -18-56 





BASIC FLIP 




77155 


01677 




77156 


01700 




77157 


01701 




77160 


01702 




77161 


01703 




77162 


01704 




77163 


01705 




77164 


01706 




77165 


01707 




77166 


01710 




77167 


01711 




77170 


01712 




77171 


01713 




77172 


01714 




77173 


01715 




77174 


01716 




77175 


01717 




77176 


01720 




77177 


01721 




77200 


01722 




77201 


01723 




77202 


01724 




77203 


01725 




77204 


01726 




77205 


01727 




77206 


01730 


CO 

6 


77207 


01731 


77210 


01732 


o 
o 


77211 


01733 




77212 


01734 


Cm 


77213 


01735 




, '77214 


01736 



44 01673 0X744 

44 01615 01701 
23 20000 00011 
46.01703 01710 
11 00005 10000 
li 00006 00005 
11 10000 00006 
11 00011 00010 
13 20000 20000 
42 00045 01712 
11 00045 20000 
13 20000 20000 
35 01767 01714 
54 00006 00107 
54 Q0005 00107 
35 00006 00005 
21 00010 00074 

45 00000 01750 
54 00005 00032 
11 00040 00012 
74 20000 00012 
11 20000 00005 
47 01506 01734 
21 00010 00012 
42 01771 01607 
42 01770 01732 
45 00000 01737 
11 01772 10000 
53 00005 00010 
11 20000 JoOOOO) 
45 10000L01736"] 
45 OOOOO^OOOOOj 



WHAT OPERATION 
TO PERFORM 
SCX-5CY TO Til 
WHICH TO BE SHIFTED? 
INTERCHANGE 
THE 
ARGUMENTS 
SCY TO SCX 
SHIFT TOO 
LARGE ? 
SET MAX SHIFT 
SHIFT 

Y CORRECT 
AMOUNT 
SHIFT X 
ADD 

CORRECT SCX 
JUMP 

SHIFT X IN A 
. CLEAR T 12 
X TIMES 2 TO THE P 

I8-P TO TX2 
IS ANSWER ZERO t 
SCX ~P TO SCX 
CHECK 
SIZE OF 
SCX 
PACK 

ANSWER 
STORE 

TRACE SWITCH 
EXIT 



A_lfte: 



>RM NO C. T. ■ I fa t 



'CONVAIR- DIVISION OF OENERAL DYNAMICS CORF. 



SAN OIEGO. CALIFORNIA 



cv-n 



page eUof loo 

REPORT ZM U90- 

MODEL All 

DATE 1-18-56 



1 


BASIC FLIP 








/ 




77215 


01737 


45 


00000 


76045 


ALARM EXIT 7 




77216 


01740 


11 


00041 


20000 


RECIPROCATE 




77217 


01741 


36 


00010 


00010 


X 




77220 


01742 


31 


00066 


00042 


FOR ' y 




/ 77221 


01743 


73 


00005 


00005 


DIVISION 




/ 77222 


01744 


71 


00006 


00005 


MULTIPLY 




/ 77223 


01745 


54 


20000 


00045 


X TIMES Y 




77224 


01746 


11 


20000 


00005 


AND STORE 




77225 


0i747 


21 


00010 


00011 


AS X 




77226 


01750 


54 


00007 


10034 


TEST WHETHER 




>7227 


01751 


47 


01752 


01721 


TO ACCUMULATE 




77230 


01752 


11 


00007 


00006 


SHIFT 




77231 


01753 


54 


10000 


00054 


B TO 


[ 


77232 


01754 


11 


20000 


00011 


Y STORAGE 




77233 


01755 


11 


00010 


20000 


SCX TO A 


"w^ 


77234 


01756 


11 


00040 


00007 


CLEAR B 


/ 


77235 


01157 


40 


00000 


01701 


JUMP 




77236 


01760 


00 


77000 


00000 


EX 




77237 


01761 


00 


00200 


02000 


TR 




77240 


01762 


00 


00400 


04000 


AC 




77241 


01763 


00 


00177 


71777 


TO 




77242 


01764 


00 


00600 


06000 


RS 




77243 


01765 


00 


00000 


00043 


35 




77244 


01766 


10 


77777 


10000 ' 


PROTOTYPE 




77245 


01767 


54 


00006 


00107 


COMMANDS 




77246 


01770 


00 


00000 


00200 


128 


1-4 


77247 


01771 


77 


77777 


77600 


EXTRACTOR 


CO 


77250 


01772 


77 


77777 


77400 




O . 

a- 
r- 

>< 


77251 


01773 


54 


00006 


00110 


PROTOTYPE COMMA 



8-186 



pirtRM 



R|*« NO E T . 1 (Jj.F 



o 

0" 



a. 



77262 
77263 
7726^ 
77265 
77266 
77267 
77270 
77271 
77272 
77273 
7727U 

77275 
77276 
77277 
77300 
77301 
77302 
77303 
773C* 
77305 
77306 
77307 
77310 
773U 
77312 
77313 
7731^ 
77315 
77316 

77317 
77320 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
"SAN DIEGO DIVISION 

CV-11 55 puNCH SUBROUTINE 
11 01067 00002 prototype -^ t2 



01000 

01001 u 00005 00035 

01002 11 000U0 00036 

01003 75 30016 OIOO5 

OiOCA u 01051 00015 

01005 % J00005 20015 

01006 U3 20000 oioio 

01007 37 00027 00015 

01010 751002001012 

01011 13 0007^ 00015 

01012 71 00035 OlOfcl 

01013 k6 0101^ 01015 

oioiif 11 01037 00015 

01015 5^ 20000 00051 

01016 12 20000 20000 

01017 35 OIO5O 20000 

01020 75 010M 00016 

01021 13 010U0 00017 

01022 75 3OOO6 0102U 

01023 73 01C&2 00020 
01021* 11 01036 00037 

01025 U 00036 20000 

01026 k6 01027 01030 

01027 11 01037 00027 

01030 12 20000 20000 

01031 73 010^7 00030 

01032 11 20000 00031 

01033 11 01063 0003^ 
0103U 75 20017 00015 

01035 21 00015 00002 

01036 00 00000 00CA2 



PAGE -85 9 f 10( 
REPORT NO 2M4|90 
MODEL All 
DATE 12/lV5k 



'35 



— ^decimal exponent (d»e«) 
load temporary orders 

test X 

enter temporaries 

put "space" to all digits 

X*lo? 

adjust sign digit 

X*lo7 as integer 

H 

Hound 
1st digit 
decimal point 

Remaining digits 

set deoimal point 

adjust sign digit of d«e« 

|d.e«| 

1st digit d f e« 
2nd digit d«e # 
jump order ' 

conrert to orders 
deoimal poijat 



cWlBT 



o 

Qs 



X 

a* 



77521 
77322 

77323 
7732k 
77325 
77326 
77327 
77330 
77331 
77332 
77333 
7733** 
77335 
77536 

77337 
773^0 

773^1 
773^2 
773^3 
773M+ 
773^5 
773^6 

773^7 
77350 

77351 

76703 

77^50 
77^51 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN Dlt GO DIVISION fV-11 



01037 00 00000 0001U 

OlOlfO 00 00000 00006 

0KA1 00 cx&6l 13200 

010U2 00 00036 M100 

0101+3 00 00003 032U0 

01C&U 00 00000 23^20 

0KA5 00 00000 01750 

0l0iv6 00 00000 OOllvU 

010U7 00 00000 00012 

01050 00 00000 00005 

00015 16 01736 00015 

00016 n>i 00036 0007^ 

00017 Ik 30003 20035 

00020 Ik iv5003 10016] 

00021 (lVU5003 00025 

00022 23 00036 0007^ 

00023 Ik 20003 20035 

0002^ ^5 00000 00021J 

00025 Ik 51003 20035 

00026 16 00015 01736 

00027 ^5 00000 01735 

00030 37 77777 30000 

00031 23 77777 75^ 

00032 2k 00000 00004 

01067 63 00000 000^5 



12, 
6. 
10? 
10 6 

105 
io3 

10 2 
10 



save exit address 

d,e -+1-7? d.e. 

N-.10-* N 

10iH 

liN 

d#e.-l — ^ d«©# 

ION -> N 

jump 

FLOATING * FIXED 

roe tor© exit 

exit 

1 (ad Justed for rounding) 

10 (adjusted for rounding) 
10 

prototype order 



pagl- 06of 100 

REPOR1 NO ZM-^90 
MODEL All 

DATE 12/l!4/5i4 



76703 70 77262 03^00 i oador parameter 

. 52 PRINT SUBROUTINE 

01000 11 00042 00002 set prototype 

01001 45 00000 01003 jump 



767OI 767OI 02 77^50 00200 loader parameter 



8-188 



> KM NO t? T 1 JV F 



CO 
I 

o 
o 
o 



£4* 

a. 



77352 
77355 
773^ 
77555 
77356 

77357 
77360 
77361 
77362 
77365 
7736** 
77365 
77366 

77367 
77370 

77371 
77372 
77373 
7737^ 
77375 
77376 

77377 
77**00 
77^01 
77^02 
77^03 

77^05 
77"+06 
77^07 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 

if 3 INPUT CONVERSION SUBROUTINE 

CV-11 

set switch la 



01000 16 0101*2 01025 

01001 15*00013 01003 

01002 16 00013 0106** 

01003 11 30000 ooooi* 
01001* 11 01051 00012 

01005 11 01051 OOOO3 

01006 11 0101+6 0102U 

01007 37 010U1 01032 

01010 1*3 00061 01012 

01011 23 0102** 01050 

01012 23 OOOO5 00005 

01013 37 010U 01032 
oioiu 75 20013 760U5 

01015 »*3 0001*5 01016 

01016 51 0006** 00006 

01017 11 00060 00007 

01020 23 00007 00006 

01021 71 00060 00005 

01022 35 00007 00005 

01023 hi 00003 01013 



set orders 

(x) —-? x 

6 —^ tally 2 

6 ^ tally 1 

a©t order y. -U-tT N 

1st FLEX di K lt (sign) 

Tost for minus sign 

charge order : -f % -* j "* " r 

—> A,K 

one di gi t — ^ A 



binary di^it -? A 



10 Vt-cT-^^h. 



Index tally 2 

01021* [13 00005 30000/ *- °tV -* {- ' ? 



01025 37 01025 30000 

01026 $h 00032 00037 

01027 73 01070 00032 

01030 75 30016 00011* 

01031 11 01052 00011* 

01032 1*1 00012 01037 

01033 11 01003 20000 
01031* 35 00073 01035 
01035 U 30000 00001* 



PAGE -07 Of 100 

REPORT -A. ZliAlSlO 
MODEL All 

DATE 12/]i|/5U 



A/«251 -^ a v 

yl/. 2 3X7 10*7-?// 

enter temporary ordere 

Index tally 2 (Digit Subroutine 

(x+-l) -J* x 



8-189 



3BM NO E T ■ I J*. F 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 



77I+H 
77M2 
77M5 
77M1+ 
77^15 
77U6 

77^17 
771+20 
77U2I 
77U22 
77^23 
77I+2I+ 
77^25 
77^26 

77^27 
77U30 

77^31 
77^32 

77*33 
771+3* 
77*55 
77*36 
77*37 
, 77**0 
77**1 
77**2 



01036 U OOO67 00012 

01037 33 0000* 00006 

0101+0 51 0006* 20000 

010*1 1+5 00000 50000 

0101*2 00 00000 010*3 

010*3 11 0007* 00003 

010** 11 0101+7 01021+ 

0101+5 *5 00000 01007 

010*6 13 00005 00032 

0101+7 13 00005 00033 

. 01050 02 00000 00000 

01051 00 00000 00006 

00011+ 16 01736 00002 

00015 11+ 1+2003 20031 

00016 11 20000 00032 

00017 fi* 30003 10032 

00020 21 00033 0007* 

00021 1+6 00017J00022 

00022 [~*3 0001+0 00026 

00023 1* 20003 10032 
00021+ 23 00033 00071* 
0002^ 1*5 00000 00022 

00026 11 00032 00000 

00027 16 00002 01736 

00030 1+5 00000 01735 

00031 21+ 00000 00001+ 
01070 00 001+61 13200 



CV-11 
7 -*• tally 2 

shift one flex dipit, 

x tract to A 

exit 

constant 

1 -^ tally 1 

set order - 71 -«> d.e. 

jump 

constants 

store exit address 
FIXED — ^ FLOATING 



page ,'• as of 100 

REPORT NO 2^1-^90 
MODEL jQ]^ 

DATE 12/lV^ 







10' 



76663 76663 72 77352 05000 



loader parameters 



8-190 



FORM NO E T . I 1*-F 



CONSOLIDATEO VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 



DIEGO pi 

CV-11 

61 COSINE SUBROUTINE 



771*92 01000 11 0105^ 0000U. 
77^53 01001 1*5 00000 01003 



jump 



page - 89 of 100 

REPORT NO ZM-il90 
MODEL £]1 

DATE 12/lh/5h 



76717 76717 02 77^52 00200 loader parameter 

60 SINE SUBROUTINE 



1 

co 

6 

© 



£ 

&• 



77^5** 


01000 


11 OOOUO 0000* 


— ^ tj^ 


77U55 


01001 


23 00010 00056 


Bcx-27 — > sox 


77*56 


01002 


k6 01003 760*5 


ALARM? 


77*57 


01003 


35 00053 20000 


sox-27 -r 5^ -* A 


77*60 


010C& 


k6 01006 01007 


Zero Result? 


77*61- 


01005 


00 00000 00056 


30, 


77*62 


01006 


11 000*0 00009 


~~* x 


77*63 


01007 


36 01005 10000 


bcx-27 +5U-50 -> Q,A 


77*6* 


01010 


39 01050 oioil "") 




77*65 


01011 


[ll 00010 10600/ J 


x . 2 scx — > % 


77*66 


01012 


** 01013 0101* 


left shift? 


77*67 


01013 


11 20000 20000 


— — > L 


77*70 


0101* 


73 01060 10000 


x-n»2lr — > A -»T 


77*71 


01015 


35 0000* 20000 "f -f (° • £ -> Y 


77*72 


01016 


U 00066 0000* 


+ J.^vn -^ t | 4 


77*73 


01017 


*2 OIO52 01023 


%• Y 


77*7* 


01020 


55 0000* 00001 


change sign t^ 


77*75 


01021 


36 01051 20000 


Y-D--^ 


77*76 


01022 


*5 01057 01017 


jump 


77U77 
77500 


01023 
01021* 


5* 20000 000*3 
73 01052 00005 


' 4ft ^ * @ 


77501 


01025 


71 00005 10000 -j 




77502 


01026 


5* 20000 000*9 \ 


" ^ -^ v 6 (35) 


77503 


OIO27 


11 20000 00006 J 




7750U 


01030 


ll 000*0 00007 


— =» P 
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FORM NO E T . 


1®-F 




77505 




77506 




77507 




77510 




77511 




77512 




77513 




7751* 




77515 




77516 




77517 




77520 




77521 




77522 




77523 




7752* 




77525 




77526 




77527 




.77550 




77531 




77532 


co 

o 


77533 


7753* 


ft 




X 

0* 


: 7^715 



CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN OIEGO DIVISION 



cv-11 



01031 15 01022 01035 

01032 U 000** 00010 

01033 ["71 00007 00006 
0103* 5* 20000 000*5 

01035 35 01060 00007 

01036 23 01035 00073 
01057 *1 00010 O1033J 

010*0 71 00007 00003 "\ 

010*1 3* 20000 OOCI45 C 

010*2 11 20000 00003 J 

0101+3 u 0000* 10000 

010** ** 010*5 010*6 

010*5 13 00005 00005 

010*6 11 0007^ 00010 

010*7 *5 00000 01721 

01050 5* 00005 2*110 

01051 1* **176 65200 

01052 06 22077 3250* 

01053 31 10375 52202 
0105* 65 52*20 76*52 

01055 01 21*6* 23731 

01056 77 73155 *63*6 

01057 00 00117 32757 
01060 31 10375 52*21 

76715 61 77*5* 0*700 



9 — * i 
h —^ tally 

x.P+Cl -*P (^ 

step i 
done? 

x.P — > x Q4 

check sign t^ 
-x — f x 

1 -^ SCX 

exit 
prototype 

1* (§) 
°i 

°5 

Co. 

2tr /5§ 
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loader parameter 
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FOMM NO E T I )•) 



CONVAIR - DIVISION OF GENERAL BYNAMICS CORP. 



SAN L/itC.O .CALIFORNIA 



Y 



CV-11 



By i C.Jv' Swift' 



PAGi-rhQ^ 91 of 10 
report „ 2M 1+90 ^ 

MODEL AH 

date August 9# 1955 



FLIP CHARACTRON TRACE 



A- 

o 



a* 



ACTIVATING SUBROUTINE 



77570 


77570 


45 26111 41501 


FLIPT 


77571 


77571 


45 26110 31501 


FLOPT 


77572 


77572 


16 77577 01735 


SET ES JUMP TO NOT TRACS 


77573 


77573 


(61 00000 20000 


PRINT 


77574 


77574 


34 20000 00006 


SUB 


77375 


77575 


47 77573] 77576 


ROUTINE 


77576 


77576 


11 01735 77213 


PUCE JUMP IN MD 


77577 


77577 


56 00000 0X736 


STOP 


77600 


77600 


11 77214 01735 


PLACE JUMP IN ES \ 


77601 


77601 


37 71174 71140 


PROCESS TWO 


77602 


77602 


37 71174 71140 


PAQES OF TRACE \ 


77603 


77603 


31 77371 00052 


FLOPT TO ACC v 


77604 


77604 


37 77604 [77606] 


TWO WAY 


77605 


77605 


37 77604 77572 


SWITCH 


77606 


77606 


31 77570 00052 


FLtPT TO ACC 


77607 


77607 


37 01735 77373 


SET ES JUMP TO TRACE 



A-1Q3 



FOAM NO C . T. • I 15 r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIEGO CALIFORNIA 



CV-11 



PAGE 92 of 100 

tf REPORT ZMl+90 

MODEL AH 

DATE 1-18-56 



6 

o 






FLIP CHARACTRON TRACE 



CONCURRENT SUBROUTINE 



77610 


01551 


75 


30017 


01553 


77611 


01552 


11 


77612 


01553 


77612 


01553 


11 


20000 


01553 


77613 


01554 


21 


01562 


01550 


77614 


01555 


31 


01736 


00017 


77615 


01556 


36 


00073 


01551 


77616 


01557 


15 


20000 


01560 


77617 


01560 


11 


30000 


01552 


77620 


01561 


75 


30003 


01563 


77621 


01562 


00 


01540 


57637 


77622 


01563 


21 


01550 


00043 


^77623 


01564 


42 


01S71 


01566 


77624 


01565 


37 


71174 


71140 


77625 


01566 


11 


01553 


20000 


77626 


01567 


75 


30021 


01736 


77627 


01570 


11 


77027 


01551 


77630 


01571 


11 


00011 


20130 



LOAD THIS 

INTO ES 
STORE ACC 

SET COMMAND WITH TALLY 
STORE TRACED COMMAND 

ADDRESS 
STORE TRACED 

COMMAND 
STORE INFORMATION 
IN BIN 

STEP TALLY ([iNUSED BITS IN BASIC FLIp) 

BIN FULL*? 

PROCESS INFORMATION 

RESTORE ACC 

RESTORE BASK 

FLIP IN ES 
PROTOTYPE FOR TEST 
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CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DICGO: CALIFORNIA 



CV-11 



PAGE 


93 Of IOC 


REPORT 

MODEL 

DATE 


ZMl*5>0 

All 

1-18-56 



PERMANENT CONSTANTS 



t 

CO 



o 



77716 


00040 


00 


00000 


* 


77717 


00041 


00 


00000 


00002 


77720 


00042 


61 


00000 


00045 


77721 


00043 


00 


00000 


00003 


77722 


. 00044 


00 


00000, 


00004 


77723 


00043 


00 


00000 


00037 


77724 


00046 


00 


00000 


00052 


77725 


00047 


00 


00000 


00074 


77726 


00050 


00 


00000 


00070 


77727 


00051 


00 


00000 


00064 


77730 


00052 


00 


00000 


00062 


77731 


00053 


00 


00000 


00066 


77732 


00054 


00 


00000 


00072 


77733 


00055 


00 


60000 


00060 


77734 


00056 


00 


00000 


00G33 


77735 


00057 


00 


00000 


00013 


77736 


00060 


00 


00000 


00*12 


77737 


00061 


00 


00000 


00056 


77740 


00062 


31 


10375 


52421 


77741 


00063 


31 


•46314 


63146 


77742 


00064 


00 


00000 


00077 


77743 


00065 


21 


67643 


24177 


77744 


00066 


20 


00000 


00000 


77743 


00067 


00 


00000 


00007 


77746 


00070 


37 


77777 


77777 


77747 


00071 


00 


77777 


00000 


77750 


00072 


00 


00000 


77777 


77751 


00073 


00 


00001 


00000 


77752 


00074 


00 


00000 


00001 


|7753 


00075 


00 


00001 


00001 


77754 


00076 


00 


07777 


07777 


77755 


00077 


00 


00000 


00110 



FORM NO E . T t 1} r 



CONVAIR - DIVISION OF GENERAL DYNAMICS CORP. 



SAN DIBGO CALIFORNIA 



CV-11 



PAGE $U 0f 10C 

REPORT ZU U90 

MODEL All 

DATE 1-18-56 



ASSEMBLY ROUTINE 



CD 

6 

o 
a- 



X 

a. 



77756 


00100 


11 


00122 


20000 


PARAMETER TO A 
DONE / 


77757 


00101 


47 


00102 


00000 


77760 


00105 


73 


00073 


00005 


N TO TEMP 


77761 


00103 


16 


20000 


00112 


SET PICKUP 


77762 


00104 


36 


00121 


00006 


COMPUTE ADJUSTER 


77763 


00105 


41 


00005 


00110 


DONE? 


77764 


00106 


21 


00100 


00073 


STEP PARAMETER PICKUP 


77765 


00107 


45 


00000 


00100 


RETURN 


77766 


00110 


16 


00112 


00116 


SET STORE 


77767 


00111 


11 


00040 


00007 


PICKUP 


77770 


00112 


21 


00007 


00000 


NEXT CEUt - 


77771 


00113 


55 


20000 


00033 


SHIFT IN Q 


77772 


00114 


51 


00075 


10000 


ADJUST AND 


77773 


00115 


7i 


10000 


00006 


STORE 


77774 


00116 


35 


dooo? 


00000 


COMMAND 


77775 


00117 


21 


00112 


00074 


STEP PICKUP 


77776 


00120 


45 


00000 


00105 




77777 


00121 


00 


00000 


01000 


CONSTANT 
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CO 

o 
o 



X 

a, 



V Flow Chart , Phase I 



fJMcceyir 




© 



7> 

Set o»-<4«ri rclermj 

Z3 



>kL 



t'A) ^ C 




fal 



e — 



i 



o ~> i 

Store TvAce R«"* +,fl «-Vl V 

S S f| -* e.v 



IP £>|T 
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REPORT NOZi f A[% 
MODEL All 
DATE ll/l5/5Ji 



VI Flow Chart, Phase II 



5«t e» it of loadev 



PUP 



• - - — — -J 






iL. 









P^ltlf asp 
W^s -»MT>- 



(*» c p» «-j ki ^ ' l**'** I *2*1 



Tiyi 



>* 






Wao4o y — — *) 



Replace Ht>aao 
H«<t 








^oo»o 


> 
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CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 



CV-11 
77 PHASE I of TRACE 



pag - 97^ 100 

REPORT NO 2t/-[j90 
MODEL X1\ 

DATE 12/li + /^ 





76521 


01000 


37 01000 £l023] 


2 — ^ i 




76522 


01001 


11 20000 01025 


stcre R 




76523 


01002 


31 §1736] 00017 ") 






7652* 


01003 


23 20000 00073 y 


exit address 




76525 


0100* 


u 20000 01023 J 


f 




76526 


01005 


15 20000 01006 1 






76527 


01006 


H/3OOO0J0IO2* J 


(A) —7* I 




76530 


01007 


75 30003 010U "I 






76531 . 


01010 


11 01023 [7*00l] J 


store A, I, R 




76532 


01011 


21 01010 000*3 


step 




76533 


01012 


*2 01026 01030 


done? 




7653* 


01013 


16 01027 01010 


restore 




76535 


0101* 


75 30036 01016 1 






• 76536.' 


01015 


11 01000 75000 J 


place ea on MD 




76537 


01016 


75 30036 75020 1 






765*0 


01017 


11 7*001 01000 J 


place informatj 




765*1 


01020 


65 20001 01000 


print on 1ST 2 


t 


765*2 


01021 


75 30036 01030 ~) 






765*5 


, 01022 


11 75000 01000 j 


restore ES 




765** 


01023 


15 01031 01002 


set order 




765*5 


0102* 


75 100*0 01001 "] 




1-H 
1 

CO 

d> 

o 
o 


765*6 


01025 


11 000*0 7*001 J 


olear teraporari 


765*7 


01026 


11 01023 7*037 1 




X 

a. 


76550 


01027 


00 00000 7*001 J 


constants 




76551 


01030 


11 01025 20000 


restore R 




76552 


01031 


*5 01736 01736 


exit 



76753 76753 32 76521 03100 



loader parameter 
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CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 

CV-11 
PHASE II of TRACE 



pac - 98of 100 

REPOni ixo zu-h$0 

MODEL All 
DATE 12/Uj/^ 



6 

© 



H 



7T600 00117 H kOOOO 7^000 

77601 00120 75 31777 77673 

77602 00121 U 00001 7^001 

77603 00122 53 00000 01300 
7760k , 00123 00 00000 00000 

77605 0012k k5 00000 00215 

77606 00125 37 ooeoo 00201 

77607 00126 k5 12203 ±Lho6 

77610 00127 22 (M70 70157 

77611 00130 7k U5000 00000 

77612 00131 OX) 00000 00000 

77613 00132 11 0012k kOOOO 

7761k 00133 k5 00000 76575 

77613 0013k f"67 20010 00000 

77616 00135 15 OOI72 00137 

77617 00436 75 30003 OOlkO 

77620 00137 u[oQ70o]odoao 

77621 ooiko 11 oooai 20000 

77622 OOlkl k2 00170 001^3 

77623 001k2 k2 00171 00ik6 
7762k OOlk) 21 00137 OOO73 

77625 OOikk k2 00173 00136 

77626 001^5 k3 00000 00222 

77627 0Olk6 21 00137 0017k 

77630 00ik7 63 00000 000kg 

77631 OOI5O 55 00020 00011 

77632 00*31 37 00166 00157 

77633 ©011& 55 0(^21 00006 



store 1*0,000 
store E.S. 

Loader parameter a 

return from loader 
print flex characters 

H*lex characters 

preset kO.QGO 
enter loader 
back tap© 
preset order 

pickup A,I,R 

Test I 

Step by one 

done? , 

jump 

Step by .three 

punch carriage return 

shift; A by 3 octal 

* 

punch A 
shift C 
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7763^ 


OOI53 H 0007U 00006 


1 — ^ tally / 




77635 


00151* 37 00166 00160 


/ 
punch operation/ 




77636 


OOI55 37 00166 00157 


punch x / 




77637 
776^0 


00156 1*5 00000 OOI75 

00157 11 00043 00006 


jump 1 




3 -> tally ' SUBR0UTIHE FOR 




776U 


00160 fib 10000 00003 


OCTAL PUNCH 
SHIFT 




776U2 


00161 51 00067 20000 


X TRACT DIGIT 




77^3 


00162 35 00167 00163 


set order 




7761*1* 


00I63 [bo 00000 ooooq] 


punch digit 




7761*5' 


00161* 1*1 00006 00160J 


Index 




7761*6 


00165 63 00000 0001*1* 


punch 8 pace 




776^7 


00166 1*5 00000 00000 


exit 




77650 


00167 63 00000 0001*5 


prototype order 




77651 


OOI70 13 77777 11T11~\ 






77652 


00171 lh 77777 77777 1 






77653 


00172 00 00700 00000 V 


^.constants 




776^ 


00173 11 01275 00000 / 






77655 


00171* 00 00003 00000/ 






77656 


00175 37 00166 00157 


punch y 




77657 


OOI76 11* 53002 20000 


punch r 




77660 
77661 


00177 U5 00000 00136 
00200 1*5 ooooojoocxxr] 


jump 


r-4 

r-i 


exit SUBROUTINE FOR 


1 

CO 

6 


77662 


00201 bl 00200 00017 ) 


FLEX PRIOT 


o 
o 

r-f 


77663 


00202 15 20000 00201* J 


set order 


X 

a. 


77661* 


00203 21 00200 0007lv 


step 




77665 


00201* 31 00000 000»*1* 


Word ^ L 




77666 


00205 1*7 OO206 00200 


done? 




77667 


00206 [5* 20000 00006 


shift next digit 




77670 


OO207 61 00000 20000 


punch 
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CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DlfcGO DIVISION 



77671 


00210 


27 0001*0 ooouo 


77672 


00211 


1*7 00206)00201] 


77673 


00212 


11 77605 00010 


7767^ 


00213 


75 30200 00125 


77675 


0021** 


11 77603 00122 


77676 


00215 


37 ^0000 00223 


77677 


00216 


75 31777 77701 


77700 


00217 


11 71*001 00001 


77701 


00220 


u 71*000 1*0000 


77702 


00221 


56 00000 1*0000 


77703 


00222 


65 20010 00300 


7770U 


00223 


61* 20010 00700 


77705 


00221* 


75 101*00 00131* 


77706 


00225 


11 oooi*o 00300 



cv-11 

clear R 

done ? 

Bet exit of loader 

put phase II Into E.S. 

set 1+0,000 for restoration 

restore ES 

restore 1+0,000 

halt 

print over old date 

read new data 

store seros for printing 
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X 
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PREPARED BY C. J. Swift 

checked by C. H. Richards 

revised by W. G. Gerkin 



C O N V A I R 



CV-52 



Page 1 of 2 

page IE001-1 

report no. zm U91 

model All 

DATE 2-27-56 






«? 



A* 



PUEDOPRINT SUBROUTINE IE001 (Revised) 

This short subroutine Is used to print (or punch) a series of 
flexowriter characters from consecutive six bit positions within 
words which are stored in consecutive memory locations* 

A code delete (octal 77) is used to signal the end of printing 
(or punching) 1 any remaining digit positions in the aame word are 
filled with zeros 

This subroutine is entered by a 37 orderj the flexowriter 
characters to be printed (or punched) follow immediately after this 
37 order# 

The routine operates from a fixed MD location, resets itself 
completely, does not require the constant pool, and uses no temporaries, 

ENTRIES 1 

Punch (P.T.) 37 77215 77216 
Print 37 77215 77217 
Drum Allocation 77213-77233 (17) (21) 



10 



8 



(Hot standard) 



rORM MHS-A 



jL2or\i 



CM 

m 

I 

o 



CCflVMil - i.JVniON Of ; GfiliRAL DYNAMICS CORP.] > fm p f 2 



FLEXPf> INT /PUNCH 



*».N ritOO CAUf CMNIA 



PAdE Jif 00/-; 

REPORT ZA1-49/ 
MODEL /)/£ 



77213 
77214 
77215 
77216 
77217 
77220 
77221 
77222 
77223 
77224 
77225 
77226 
77227 
77230 
77231 
77232 
77233 



15 77 217 7 7 7 ? 3 
11 77230 !!*>?% 
37 17215 [77216] 
11 77231 77225 
11 77232 10000 
31 77215 00017 
15 20000 77223 
21 77215 77233 
31 [77232] 00052 
43 10000 77213 

J6i ooooo 20000) 

34 20000 00006' 
47 77224 77220 
61 0000.0 20000 
63 00000 20000 
00 00000 00077 
00 00000 00001 



1 



PPSF'TS 



i 



EXIT 
• PUNCH ENTRY 

PRINT ENTRY 
"> SET 
5 PICKUP 

5TFP EXIT 

PICK UP FLEX WORD 

FINISHED? 

» 

PR INT /PUNCH CHARACTFR 
SHIFT NEXT CHARACTFR 
WORD USED UP? 
PRESETS 



FUG 
ADDRESS STEP 
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OPERATIONS RESEARCH OFFICE 
7100 Connecticut Avenue 
Chevy Chase, Maryland 



Complab 



Coded by James Chappell 
Checked by J. Chappell 
Machine checked by J. Chappell 



Title Card Title Subroutine 



Page 1 of 21 

Date 13 February 1956 



Use: 



Range: 



Storage; 



Format: 



to 


Parameter 
words: 




Modification: 




Timing: 



This routine converts alpha-numeric information coded in Flexo- 
writer code into IBM code on cards for use as page headings, 
column headings, and line titles. These cards, together with 
data cards, can be listed to produce tabular formats, for 
example, on the IBM 407. 

A maximum of 72 letters or digits may be punched in columns 1- 
72, plus a 4-digit card number in columns 76-79, a 3-digit 
alpha-numeric deck number in columns 73-75, and a 1 -column line 
space code in column 80, 

156 instructions, 01001b - 01232b 
51 constants in program, 01233b - 01315b 

36 words temporary storage in program, 01316b - 01361b / 
19 words temporary storage not in program, 00010b - 00032b 

262 words total storage 

The Convair constant storage pool is not used by this routine. 

The routine is coded in standard form and is self-resetting. 

Two types of parameter words are used by this routine. See 
description of parameter words, page 3. 

See Modification, page 7. 

1 second per card average. (See Timing, page 7.) 
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to 

a 

i 






ORr-118 



Description of Service 



This subroutine was designed to allow the programmer wishing 
tabular output to make use of punched card equipment to produce quickly 
a neat printout of flexible format. The routine uses the standard two- 
digit octal Flexowriter codes, packed 6 to an 1103 word, as input for 
setting up the appropriate IBM card code for punching by the 1103 Con- 
trolled Reproducer. Since there is not an exact correspondence between 
all the characters used on the IBM Type 407 Tabulator and the Flexo- 
writer, it was necessary to add some codes and delete others. The codes 
used are shown on page 10. Inapplicable Flexowriter codes are recog- 
nized as illegal codes and are ignored by the routine. A maximum of 12 
such coded 1103 words can be punched on one card. This produces 72 
characters or spaces in columns 1 - 72 of the card. 

The line space code, provided in column 80, is used by the tabu- 
lator to determine the number of lines there will be between the last 
card printed and the card containing the line space code. Althoughtthis 
particular routine is not set up to punch them, the line space code is 
designed to include numeric data cards. Due to the peculiarities of the 
tabulator, the dash and the ampersand will not print on alpha-numeric 
cards. The complete spacing code is shown on page 10. (For 407 wiring, 
see Listing the Cards , page 8.) 

To facilitate the arrangement of the cards for a particular 
table, a 4-digit card number can be punched in column 76 - 79. For 
distinguishing sets of cards belonging to different tables, a 3-digit 
alpha-numeric deck number is provided in columns 73-75. These, features 
are particularly helpful if the 1103 programming makes it inconvenient 
to punch the cards for the lines of the table consecutively. After the 
cards have been punched, a simple sort on card and deck number will put 
them in order for listing. The deck number and card number are in addi- 
tion to the 72 columns of alpha-numeric punching. These may be used at 
the programmer's option. (See Use of Routine, page 3.) 
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Use of Routine 

Entry: this subroutine is coded in standard form and is entered in 

the usual manner: 

RJ 01001 01002 . 
Parameter words 



NI (i.e., next instruction of the main routine.) 

The number of parameter words used is flexible, depending 
| upon the needs of the programmer. See Parameter words , 
below. 

Parameter Words: Two types of parameter words are used by this routine which 
I may be designated as primary parameter words and secondary 
i parameter words. A primary parameter word is necessary for 
[ every group of cards punched. A secondary parameter word 
is used only if a card number, a deck number, or a code 
punch is desired. Any number of Primary parameter words 
alone or groups of pjimary and secondary parameter words 
may follow the RJ entry to the routine, and the routine 
will exit to the NI, provided that in every case in which a 
card number, deck number, or code punch is desired, a secon- 
dary parameter word follows immediately the associated pri- 
mary parameter word, and that no secondary parameter word is 
;-■ used where no card nor deck number, nor line space code is 
used. The format of the two types of parameter words is as 
follows: 

Primary parameter word 00 XXNNZ AAAAA 

Secondary parameter word KK DDDDD CCCCC 

The first two octal digits of all primary parameter words 
must be zeros and the NI must be a legitimate 1103 machine 
instruction with an operation code greater than 10b since 
the routine determines the end of the parameter word list 
by testing for this condition, 

X = number of cards to be punched under control of this parti- 

cular parameter word; 1_< X < 77b 

N = number of coded words to be used per card; thus 6N letters 

or digits of information will be placed on each card; 
1< N < 14b. 
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A = address of first coded 1103 word, A may be either a drum 

or MC address. 

The desired letters or numbers are coded in Flexowriter 
code, 6 to an 1103 word; for example, ABC 75 would be 
coded as follows: 30 23160 47262 

Therefore, NX consecutive coded words must be provided 
beginning at location A. 

2 =1 octal digit which determines the use of deck numbers, 

card numbers, and line space codes. A 1 in the first bin- 
ary position causes the routine to punch a deck number, a 
1 in the second binary position produces a card number, and 
a 1 in the third binary position produces a line space code, 
A in any of the 3 positions causes the routine to bypass 
that portion of the routine controlled by that particular 
bit. 

Thus the values of Z produce the following results: 

Z = 0; no deck number, no card number, no line space code 

1; no deck number, no card number, a line space code 

2; no deck number, a card number, no line space code 

3; no deck number, a card number, a line space code 

. 4; a deck number, no card number, no line space code 

5; a deck number, no card number, a line space code 

6; a deck number, a card number, no line space code 

7; a deck number, a card number, a line space code 

If Z = 0, a Type B Parameter word should not be used. 
If Z = and a Type B parameter is used, it will jbe used 
by the routine as the NI. 

If Z ^ 0, a secondary parameter word must be used. 

If Z j& 0, and no secondary parameter word is used, the 
1103 word following the primary parameter word will be 
used as the secondary parameter word. 

D = address of Deck number which may be either drum or MC 

address. The deck number is a 3-digit alpha-numeric num- 
ber coded in the same manner as the regular coded words 
and stored in the last 6 octal positions of an 1103 word. 
The same deck number will be placed on all cards punched 
under control of a single parameter word. The address of 
this word is D in the parameter word. 



8-208 



to 

HI 

<A 

O 



ft* 



Page 5 of 21 



= address of Card number which may be drum or UC address. 

The card number must be coded in octal and will be punched 
as a decimal number in columns 76 - 79 of the card. The 
1103 word containing the card number is made up of two 
parts, as follows: 



HH 00000 BBBBB 



where B is the octal equivalent of the number to be punched 
in the first card and H is the increment by which the card 
numbers are to be advanced, For example, if C contained 



02 00000 00144 



the card numbers would be 100, 102, 104, 106 . . . 

The decimal value of the card number can never exceed 4 
digits. 

= the line space code (i.e., octal equivalent of card row 
in which the column 80 punch is desired). 



Card Row Value of K 

(Line space code) (octal) 

12 14 

11 13 


9 11 
8 10 
7 7 
6 6 
5 5 
4 4 
3 3 
2 2 

1 1 
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The ORO IBM 407 has been wired to space on this code as 
follows : 



Single Suppress Double Quadruple 
Spacing Spacing Spacing Spacing 

Numeric data cards no punch 3 6 9 

Alpha-numeric cards 

(Print wheels 1-72) 14 7 11 

(from card col. 1-72) 

Alpha-numeric cards 

(Print wheels 73-120) 2 5 8 12 

(from card col, 1-48) 



Since the spacing is done before printing the card, the 
line space code must be placed in the card on which the 
desired space or space suppression is wanted. Thus to 
achieve quadruple spacing after a heading, a 9 punch would 
be placed in the first data card. To print more than 1 
card per line, a space suppress code will be placed in all 
but the first of the cards to be printed on that line. 



Alarm Conditions 

Code 1: A value greater than 14b has been placed on K. 

Code 2: Decimal equivalent of card number exceeds 4 digits. 

After typing out the appropriate code, the machine will 
halt on a zero stop. At this time the secondary parameter 
word upon which the routine is attempting to operate will 
appear in Q and the address of this secondary parameter 
word will appear in Ar. The parameter word in Q will have 
the normal secondary parameter word format; KK DDDDD CCCCC, 
Starting the machine again will cause the subroutine to 
exit either to the NI or return to process the next para- 
meter word, whichever is applicable. 
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Timing 



Several timed runs made on the 0R0 1103 produced the following 
results: With the coded information stored in the magnetic core memory, 
times varied from a minimum of 60 cards per minute with l\ coded words 
per card, deck number, and line space code to a maximum of 79 cards 
per minute with only 1 coded word per card and no deck number, card 
number, or line space code. With the coded words stored in the drum, 
the corresponding figures were a minimum of 40 cards per minute and a 
maximum of 75 cards per minute. 



Modification 



Since this routine was assembled with the Ramo-Wooldridge one- 
pass assembly routine (RW-72), it can be modified by changing the direc- 
tory cards. If this is done, the main program (the A00 regions) should 
follow in consecutive order. If desired the card image (C100 region) 
may be assembled elsewhere in the rapid-access memory. If it is desired 
to modify the octal version of the program, only 254b words should be 
modified. 



Explanation of Dictionaries 



Figure I (page 11) shows a binary breakdown of the card diction- 
aries. Dictionary I is used for all Flex codes < 45 and Dictionary II is 
used for all Flex codes > 45. It can be seen that if the appropriate dic- 
tionary were shifted row by row, the number of places left corresponding 
to the octal Flex code, the resulting configuration would be such that the 
extreme right bits of the 12 words would correspond to the IBM code of the 
letter, number, or symbol whose Flex code was used. In the routine, to 
avoid destroying the dictionary, each row is shifted in the Accumulator 
and handled independently. All unused or illegal codes have an entire 
column of l's as a signal to the routine to ignore that code. 
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Listing the Cards 

Several basic assumptions were made in wiring the 407 control 
panel for listing these cards. These were: 

1. The cards will be in order when fed into the 407. Either 
they were punched consecutively by the 1103 or they were 
sorted into the correct order by use of the card and deck 
number. If the first card to be printed is an alpha- 
numeric card, it should be preceded by a blank card. 

2. The carriagetape is punched to space a fixed amount at 
the top and bottom of each page. 

3. Spacing in excess of 3 lines between printed lines will be 
taken care of by the use of cards which are blank in 
columns 1-72. 

4. Wiring for listing the numeric data cards will be done 
separately for each table. The wiring for the alpha- 
numeric cards is the same for all tables and is perma- 
nently wired into the control panel. 

5. Zero print control will be wired only for numeric data 
cards. It is this assumption which makes the dash and 
the ampersand fail to print on alpha-numeric cards. 

For purposes of explaining the 0R0 control panel used to list 
these cards, one further assumption is made. This assumption is that 
the reader is familiar with the operation of the IBM 407 tabulator and 
understands how to wire it for listing. The basic principles for this 
can be found in pages 5 - 16, 22 - 27, and 54 of IBM Accounting Machine 
Type 407 Principles of Operation, Fifth Revision, International Business 
Machines, New York, 1953. 

Complete format flexibility is obtained by each person doing 
the wiring necessary to list his specific numeric cards. This consists 
of wiring from the second read outlet for impulses from each card column 
to be printed into the normal print entry for the type wheel in which the 
J?. column is to print. If only numbers are to be printed with no zeros to 

•j the left of the most significant digit, zero print control for all but 

*} the type wheel for the most significant digit of the number should be 

g jack plugged. Zero print control for cases involving dollar signs, 

^ decimal points, commas, etc. is as shown in the 407 Principles of Opera- 

tion Manual. When more than 10 filters, which are standard on the mach- 



ts 



jij ine, are needed, co-selectors 13 and 14 can be used. In this case the 
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information to be filtered can be taken into the C (i.e., common) hub of 
the selector and out of the corresponding T (i.e., transferred) hub of 
the selector. 

For those who may need to set up a similar 407 control panel two 
problems must be solved. One of these is finding a way to print in two 
different type wheels from one card column. The second is to provide the 
line spacing indicated by the column 80 code shown on page 6. 

The first of these problems was solved on the OfiO board by the 
combined use of co-selectors and transfer print. Transfer print was picked 
up on all the line space codes used by alpha-numeric cards. In addition 
to this co-selectors 1-10 were picked up for those cards which were to 
print in type wheels 73-120. This means that card columns 1-48 go into 
the common of the co-selectors and out of the normal side into type 
wheels 1-48. When the co-selectors transfer because of a 2, 5, 8 or 
12 punch in column 80, columns 1-48 will print in type wheels 73-120. 

The wiring used to obtain the spacing is shown in Figure 2, This 
figure also shows the wiring used to pick up Transfer Print Entry for the 
printing of the alpha-numeric cards. It will be noted that a set of numer- 
ic cards which are blank in column 80 will list with single spacing. If 
these cards were to be double spaced, a 6 should be gang punched in 
column 80. 
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Octal Codes Dsed for this Subroutine 



Numbers 


Octal Code 





03 


1 


52 


2 


74 


3 


70 


4 


64 


5 


62 


6 


66 


7 


72 


8 


60 


9 


33 



Letters Octal Code 



A 30 

B 23 

C 16 

D 22 

E 20 

F 26 

G 13 

H 05 

I 14 

J 32 

K 36 

L 11 

M 07 

N 06 

03 Special Symbols 

P 15 

Q 35 . (period) 42 

R 12 , (comma) 46 

S 24 a 63 

T 01 $ (dollar sign) 65 

U 34 * (asterisk) 67 

V 17 / (fraction bar) 50 
W 31 % (per cent) 10 
X 27 # (number sign) 40 

Y 25 @(At sign) 41 
Z 21 Space 04 



All other 2-digit octal combinations are recognized as illegal and are 
ignored. 
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DICTIG-...&Y I 





EAW00P 


OCTAL 


CARD 




































































CODING 


CODING 


ROW 


T 







SpH N 


M % 


L 


R G 


I 


P c 


V 


E 


Z D 


B 


S Y 


F 


X A 


w 


J 


9 


U Q 


K 





# 


@ 


• 








OCDOO 


01262 


12 





1 








1 














1 


1 


1 





1 





1 


1 





1 


1 





























1 1 ] 








0CD01 


01263 


11 





1 


1 





1 


1 





1 


1 








1 





























1 








1 


1 











1 1 








0CD02 


01264 





1 


1 














1 

















1 





1 








1 1 





1 


1 








1 








1 








1 ] 








0CD03 


01265 


1 





1 





















































1 





1 























1 1 








0CD04 


01266 


2 





1 












































1 


1 























1 











1 ] 








0CD05 


01267 


3 


1 


1 

















1 











1 















































1 





1 1 ] 








0CD06 


01270 


4 





1 











1 


1 


























1 























1 














1 


1 ] 








0CD07 


01271 


5 





1 








1 























1 


1 















































1 ] 








0CD08 


01272 


6 





1 


1 















































1 





1 


























1 ] 








0CD09 


01273 


7 





1 























1 





1 























1 





























1 ] 








0CD10 


01274 


8 





1 








1 





1 
































1 




















1 








1 


1 


1 1 ] 








0CD11 


01275 


9 





1 




















1 





1 











1 























1 




















1 ] 




























DICTIONARY II 






































I- 1 
cc 












t 




/ 


1 












8 


5 n 


4 $ 6 


* 


3 


7 


2 


























0CD12 


01276 


12 


1 





1 





1 


1 






1 


1 





1 


1 














1 





1 


1 
























0CD13 


01277 


11 


1 





1 





1 


1 






1 


1 





1 








1 





1 


1 





1 


1 


























0CD14 


01300 





1 


1 


1 


1 


1 


1 






1 


1 





1 

















1 





1 


1 
























"" 


0CD15 


01301 


1 


1 





1 


1 


1 1 


1 






1 


1 





1 

















1 





1 


1 


























0CD16 


01302 


2 


* 1 





1 





1 


1 






1 


1 





1 

















1 





1 1 


1 


























0CD17 


01303 


3 


1 


1 


1 





1 


1 






1 


1 





1 








1 








1 1 





1 


1 


























0CD18 


01304 


4 


1 





1 





1 


1 






1 


1 





1 


1 


1 








1 


1 





1 


1 


























0CD19 


01305 


5 


1 





1 





10 


1 






1 


1 





1 1 

















1 





1 


1 


























0CD20 


01306 . 


6 


1 





1 





1 


1 






1 


1 





1 











1 





1 





1 


1 


























0CD21 


01307 


7 - 


1 





1 





1 


1 






1 


1 





1 

















1 


1 


1 


1 
























f 


0CD22 


01310 


8 


1 


1 


1 





1 


1 






1 


1 


1 


1 


1 





1 





1 


1 





1 


1 


























0CD23 


01311 


9 


1 





1 





1 


1 






1 


1 





1 

















1 





10 


1 
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CARD TITLE SUBROUTINE 



60 

3 



ft 



RAWOOP CODING 


D 


01A00 00512 


D 


02A00 00544 


D 


03A00 00600 


D 


04A00 00611 


D 


05A00 00629 


D 


- 06A00 00642 


D 


OAPOO 00659 


D 


OOKOO 00667 


D 


OCDOO 00690 


D 


OPTOO 00712 


D 


0C100 00718 


D 


OOTOO 00008 


01AOO 00 00000 00000 


01A01 


MJ 00000 


00000 


01A02 SP 01A01 


00015 


01A03 TU A 


01A04 


01A04 TP 


B 


OOTOO 


01A05 


SP 


OOTOO 


00015 


01A06 TU A 00K14 


01A07 LQ OOTOO 10012 


01A08 


QT OOKOO A 


01A09 ST 


0PT05 


00T02 



OCTAL CODING 
01000 00 00000 00000 
01040 00 00000 00000 
01130 00 00000 00000 
01143 00 00000 00000 
01165 00 00000 00000 
01202 00 00000 00000 
01223 00 00000 00000 
01233 00 00000 00000 
01262 00 00000 00000 
01310 00 00000 00000 
01316 00 00000 00000 
00010 00 00000 00000 

01000 00 00000 00000 

01001 45 00000 



00000 



01002 31 01001 00017 

01003 15 20000 01004 

01004 11 



30000 



00010 



} 



01005 31 00010 00017 

01006 15 20000 01251 

01007 55 00010 10014 

01010 51 01233 20000 f 

01011 36 01315 00012 



EXPLANATION 
DISSECTION OF PARAMETER WORDS 
FORMULATION OF CARD IMAGE 
FORMULATION OF DECK NUMBER 
FORMULATION OF CARD NUABER 
FORMULATION OF SPACE CODE 
PUNCHING OF CARD 
ALARM PRINT ROUTINE 
CONSTANTS 
CARD DICTIONARY 
POWERS, OF TEN 
CARD IMAGE 
TEMPORARY STORAGE 

NOT USED 
NORMAL EXIT 
ENTRANCE 

PRIMARY PARAMETER WORD 
>10b 



STORE ADDRESS OF FIRST 
CODED WORD 

X - 1— >12b 
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CO 



I 

8 



OIAIO LQ OOTOO 10018 
01A11 QT OOKOO A 
01A12 ST 0PT05 00T03 
01A13 QJ 01A16 01A14 
01A14 QJ 01A16 01A15 
01A15 QJ 01A16 01A31 
01A16 TP 0PT05 A 
01A17 SA 01A01 00015 
01A18 TU A 01A21 
01A19 TO A 01A22 
01A20 TU A 01A28 
'o6AOO 



01A21 TU B 



01A22 SP B 



01A23 TU A 



00015 
01A24 

01A24 SP|B (00042 

00T01 
00030 
00T04 



01A25 TP A 
01A26 SS A 
01A27 TP A 



01A28 LQ 



B 



10006 



01A29 QT OOKOO 00T18 
01A30 RA 01A01 0PT05 
01A31 RA 01A01 0PT05 
02A00 TP 0PT05 00T05 
02A01 RP 30036 02A03 
02A02 RS 0C100 0C100 



01012 55 00010 

01013 51 01233 

01014 36 01315 

01015 44 01020 

01016 44 01020 

01017 44 01020 

01020 11 01315 

01021 32 01001 

01022 15 20000 

01023 15 20000 

01024 15 20000 



10022^ 



01025 


15 
31 


30000 






01026 


30000 


01027 


15 


20000 


01030 


31 


30000 



01031 11 20000 

01032 34 20000 

01033 11 20000 

01034 55 



30000 



01035 51 01233 

01036 21 01001 

01037 21 01001 

01040 11 01315 

01041 75 30044 

01042 23 01316 



N A l->13b 



DECK NUMBER?"^ 
:CARD NUMBER? > TEST Z 
SPACE CODE? 

ADDRESS OF 
SECONDARY PARAMETER 
WORD DETERMINED 

ADDRESS OF DECK NUMBER STORED 
ADDRESS OF CARD 
NUMBER DETERMINED 

H->llb 

CARD NUMBER— >Ub 

K— >32b 

INCREASE EXIT 

1— >15b 

CLEAR CARD IMAGE 
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8 

a 



02A03 
02A04 
02A05 
02A06 
02A07 
02A08 
02A09 
02A10 
02A11 
02A12 
02A13 
02A14 
02A15 
02A16 
02A17 
02A18 
02A19 
02A20 
02A21 
02A22 
02A23 



TV 02A02 02A34 
TO 00K14 02A10 
TO 02A03 02A12 
TO 02A02 02A21 
TO 02A02 02A36 
TP 00T03 0OTO6 
RS 00T07 00T07 
TP 



B 



00T08 



TP 00K03 00T09 
02A25 



TV 



02A02 



LQ 00T08 0Q006 
QT OOKOO A 
TJ 00K04 02A17 
RA A OOK05 
AT 00K06 02A23 
TP 00K07 OOT10 
RS OOT11 OOT11 
RP 20012 02A22 
00001 



LQ 



0C100 



RA 00T07 0PT05 
LQ OCDOO 



02A24 TP 0PT05 Q 
02A25 QS A 



0C100 



02A26 QT A A 
02A27 AT 00T11 OOTll 
02A28 RA 02A23 00K02 



01043 16 01042 01102 

01044 15 01251 01052 

01045 15 01043 01054 

01046 15 01042 01065 



r\ 



> 



01047 15 01042 01104 



V 



01050 11 00013 00016 

01051 23 00017 00017 

01052 11 



30000 



00020 



01053 11 01236 00021 

01054 16 



01042 



01071 



01055 55 00020 00006 

01056 51 01233 20000 

01057 42 01237 01061 

01060 21 20000 01240 

01061 35 01241 01067 

01062 11 01242 00022 

01063 23 00023 00023 

01064 75 20014 01066 



01065 


55 


01316 


00001 


01066 


21 


00C17 


01315 


01067 


55 


01262 


20000 


01070 


11 


01315 


1000G 


01071 


53 20000 


01316 



01072 51 20000 20000 

01073 35 00023 00023 

01074 21 01067 01235 



SETUP FDR FIELD I 



N - 1— >16b. 

CLEAR 17b 

CODED WORD -> 20b 

5->2lb 

SETUP v OF 1071b 

MASK LETTER INTO A 

TEST FOR APPROPRIATE DICTIONARY 

SETDP SHIFT 

DICTIONARY COMMAND 

13->22b 

CLEAR BIT COUNTER 

SHIFT CARD IMAGE 

1 PLACE LEFT 

INCREASE COLUMN COONTER 

SHIFT APPROPRIATE DICTIONARY AND 
LEAVE IN A 

1 BIT MASK-H>Q 

MASK FINAL BIT OF ROW OF 
DICTIONARY INTO ROW OF IMAGE 

ISOLATE FINAL BIT OF IMAGE ROW 

SUM BITS OF COLUMN 

INCREASE DICTIONARY ROW 
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X 

(1* 



02A29 RA 02A25 0PT05 
02A30 IJ 001 10 02A23 
02A31 TPy 00X11 A 
02A32 TJ 00K03 02A38 
02A33 RP 10012 02A35 
02A34 QS 00K02 



0C100 



02A35 RP 20012 02A37 
02A36 LQ 



0C100 



00035 



02A37 RS 00T07 0PT05 
02A38 TP 00T07 A 
02A39 RJ 00K18 02A46 
02A40 TU 02A41 02A12 
02A41 TU 00K17 02A21 
02A42 TU 00K17 02A36 
02A43 TV 00K17 02A34 
02A44 RS 00T07 00T07 
02A45 RS 00T05 00T05 
02A46 IJ 00T09 02A12 
02A47 RJ 02A47 02A48 
02A48 RA 02A10 00K02 
02A49 I J 00T06 02A10 
02A50 IJ 00T05 02A52 
02A51 TP 00K05 A 
02A52 AT 00K09 A 
02A53 ST 00T07 02A55 
02A54 RP 20012 03A00 
02A55 LQ 



0C1O0 



0000 



01075 21 

01076 41 

01077 11 

01100 42 

01101 75 

01102 53 

01103 75 

01104 55 

01105 23 

01106 11 

01107 42 
OHIO 15 

01111 15 

01112 15 

01113 16 

01114 23 

01115 23 

01116 41 

01117 37 

01120 21 

01121 41 

01122 41 

01123 11 

01124 35 

01125 36 

01126 75 

01127 55 
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00022 01067 

00023 20000 
01236 01106 
10014 01103 
01235 
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01316 



20014 01105 



01316 



00043 



> 



00017 01315 
00017 20000 
01255 01116 
01111 01054^1 
01254 01065 
01254 01104 
01254 01102 
00017 00017 

00015 00015^, 
00021 01054 
01117 01120 
01052 01235 

00016 01052 
00015 00124 
01240 20000^ 
01244 20000 

00017 01127 
20014 01130" 



INCREASE IMAGE ROW 
12 ROWS? 

TEST FOR ILLEGAL CODE, 
IF LEGAL, GO TO 1106b 

MASK OUT ILLEGAL BITS 

MOVE IMAGE I PLACE RIGHT 

DECREASE COLUMN COUNTER 
TEST FOR COMPLETION 
OF FIELD 



SETUP FOR FIELD II 



CODED WORD COMPLETED? 

OPTIONAL EXIT 

INCREASE ADDRESS OF CODED WORD 

N WORDS COMPLETED? 

ONE OR TWO FIELDS USED? 

SETUP SHIFT COMMAND 
MOVE CARD IMAGE TO LEFT 



01316 00000 
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03A00 LQ 00X00 


10018 


01130 


55 00010 


10022 


1 DECK NUMBER USED? 


03A01 QJ 03A02 04A00 


01131 


44 01132 


01143 J IF NOT, GO TO 1143b 


03A02 TU 03A03 02A12 


01132 


15 01133 


01054"> 




03A03 TU 00K16 02A21 


01133 


15 01253 


01065 




03A04 TU 00K16 02A36 


01134 


15 01253 


01104 










y SETUP FOR FIELD III 


03A05 TU 02A10 001(14 


01135 


15 01052 


01251 




03A06 TU 06A00 02A10 


01136 


15 01202 


01052 




03A07 TV 00K16 02A34 


01137 


16 01253 


01102^ 




03A08 RJ 02A47 02A09 


01140 


37 01117 


01051 FORM DECK NUMBER IN IMAGE 


03A09 RP 20012 04A00 


01141 


75 20014 


01143 | POSITION DECK NUMBER ' 


03A10 LQ 0C124 00005 


01142 


55 01346 


00005 J IN FIELD III 


04A00 LQ 00T00 10019 


01143 


55 00010 


10023^ CARD NUMBER USED? 


04A01 QJ 04A02 05A0O 


01144 


44 01145 0116sJ IF NOT, GO TO 1165b 


04A02 TP 00T04 A 


01145 


11 00014 


20000 CARD NUMBER^A 


04A03 TJ 00K01 04A06 


01146 42 01245 01151^ 




04A04 SP 00K21 00042 


01147 


31 01260 


00052 


^ ALARM IF CARD NUMBER 








| 4 DIGITS 


04A05 MJ 00000 OAPOO 


01150 45 00000 01223J 


04A06 RP 30004 04A08 


01151 


75 30004 


01153^ CONVERT TO DECIMAL AND 


04A07 DV 0PT02 00T12 


01152 


73 01312 


00024 J STORE DIGITS IN 24b - 27b 


04A08 TV 04A07 04A12 


01153 


16 01152 


01157 SETUP v OF 1157b 


04A09 TP 00K08 00T05 


01154 


11 01243 


00015 3->15b 


04A10 LQ 0PT05 10005 


01155 


55 01315 


10005 FLOATING 1->Q 


04A11 TV 00K01 04A14 


01156 


16 01234 


01161^1 

1 






01157 21 01161 

01160 55 10000 

01161 53 10000 

01162 21 01157 




} SETUP v OF 1161b 


04A12 RA 04A14 


00T12 


00024 j 


' 


04A13 LQ Q 


35 


00043 


SHIFT FLOATING 1 


04A14 QS Q 


0C126 


01350 


MASK BIT INTO IMAGE 


04A15 RA 04A12 


0PT05 


01315 




04A16 IJ 00T05 04A11 


01163 41 00015 


01156 4 DIGITS FORMED? 


04A17 RA 00X04 


OOTOl 


01164 


21 00014 


00011 


INCREASE CARD NUMBER 
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05A00 LQ 00X00 10020 


01165 


55 00010 10024 


^ CODE PUNCH USED? 






05A01 QJ 05A02 06A00 


01166 


44 01167 01202 


J IF NOI, GO XO 1202b 






05A02 TP 00X18 A 


01167 


11 00032 20000 


K->A 






05A03 XJ 00K19 05A06 


01170 42 01256 01173 


1 






05A04 SP 00K20 00042 


01171 


31 01257 00052 


S ALARM IF K— >14b 






05A05 MJ 00000 0AP00 


01172 


45 00000 01223^ 






05A06 XJ 00K22 05A09 


01173 42 01261 01176^ 






05A07 SX 00K22 A 


01174 


36 01261 20000 


DETERMINE ROW OF CARD 






05A08 XN A A 


01175 


13 20000 20000 


^ IMAGE IN WHICH CODE 






05A09 RA A 00K01 


01176 21 20000 01234 


PUNCH IS XO BE PLACED 






05A10 XV A 05A12 


01177 


16 20000 01201 






05A11 XP 0PX05 


Q 


01200 

| 01201 

01202 


11 01315 


10000 


1 BIX MASK->Q 

MASK BIX INXO ROW OF IMAGE 

CYCLE REPRODUCER 






05A12 QS 0PI05 


0C126 


53 01315 


01350 






06A00 EF 00000 


00K11 


17 00000 


01246 






06A01 IP 00K07 00X01 


01203 


11 01242 00022 


ROW COUNXER = 12 






06A02 RP 30003 
06A03 XV 00K12 


06A04 
06A04 


01204 
01205 
01206 
01207 
01210 
01211 
01212 


75 30003 
16 01247 


01206 
01206 


f SETUP -v OF EW ORDERS 

> EW ORDERS 

> DECREASE v OF EW ORDERS 






06A04 EW 00000 
06A05 EW 10000 


0C135 


77 00000 
77 10000 


01361 






0C111 


01331 


















06A06 EW 10000 


0C123 


77 10000 


01345 






06A07 RP 20003 
06A08 RS 06A04 


06A09 
0PX05 


75 20003 
23 01206 


01213 
01315 




to 

H 
H 


06A09 IJ 00X10 06A04 


01213 


41 00022 01206 


12 ROWS? 






06A10 IJ 00X02 02A00 


01214 


41 00012 01040 


X CARDS COMPLEXED? 






06A11 SP 01A01 
06A12 XU A 


00015 
06A13 


01215 
01216 
01217 


31 01001 
15 20000 


00017 
01217 


CONXENXS OF EXIT 

> 

ADDRESS— >Q 

J 






06A13 LQ 


B 


10006 


55 


30000 


10006 





8-221 



ORr-118 



Page 18 of 21 



i 






06A14 QT 00K00 A 
06A15 XJ 00K15 01A02 
06A16 MJ 00000 01A01 



0AP00 PR 
0AP01 SS 
0AP02 ZJ 
0AP03 IN 
0AP04 SA 
0AP05 TU 
0AP06 IP 
0AP07 MS 
OOKOO 00 
00K01 00 
0GK02 00 
00K03 00 
00K04 00 
00K05 00 
00K06 LQ 
00KO7 00 
00K08 00 
00K09 LQ 
00K10 00 
00K11 00 
00K12 00 
00K13 00 
00K14 00 
00K15 00 



00000; A 
A 00006 
OAPOO 0AP03 
0PT05 A 
01A01 00015 
A 0AP06 
Q 



B 



01220 51 01233 

01221 42 01252 

01222 45 00000 

01223 61 00000 

01224 34 20000 

01225 47 01223 

01226 13 01315 

01227 32 01001 

01230 15 20000 

01231 11 




OPERATION PORTION OF EXIT->A 

TEST FOR NI OR PARAMETER 
WORD. IF PARAMETER WORD, 
GO TO 1002b. IF NI, GO TO 
EXIT AT 1001b 



30000 



00000 06A11 
00000 00077 B 

00000 0C126 

00001 00000 B 
00000 00005 B 
00000 00045 B 
00014 00000 B 
OCDOO A 
00000 00013 B 
00000 00003 B 
OC100 00036 
00000 23417 B 
00000 00112 B 
00000 0C135 
00000 0C111 

0C123 



00000 



01232 56 00000 

01233 00 00000 

01234 00 00000 

01235 00 00001 

01236 00 00000 

01237 00 00000 

01240 00 00014 

01241 55 01262 

01242 00 00000 

01243 00 00000 

01244 55 01316 

01245 00 00000 

01246 00 00000 

01247 00 00000 

01250 00 00000 

01251 00 



00000 



20000 
00006 
01226 
20000 
00017 
01231 
10000 
01215 
00077 
01350 
00000 
00005 
00045 
00000 
20000 
00013 
00003 
00044 
23417 
00112 
01361 
01331 
01345 



> 



>- ALARM PRINT ROUTINE 



"N 



> CONSTANTS 



00000 00010 B 01252 00 00000 00010 



J 
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r>i 



to 

H 

i 

o 

8 



S 



00K16 00 


0C124 0C124 


01253 


00 


01346 


01346 




00K17 00 
00K18 00 


0C112 0C112 
00000 00044 B 


01254 
01255 


00 
00 


01332 
00000 


01332 
00044 


CONSTANTS 


00K19 00 


00000 00015 B 


01256 


00 


00000 


00015 


> 


00K20 16 


03222 00452 B 


01257 


16 


03222 


00452 




00K21 16 


03222 00474 B 


01260 


16 


03222 


00474 




00K22 00 


00000 00012 B 


01261 


00 


00000 


00012_^ 




0CD00 22 


03254 50007 B 


01262 


22 


03254 


50007 




0CD01 31 


54400 02306 B 


01263 


31 


54400 


02306 




0CD02 60 20123 24446 B 


01264 


60 


20123 


24446 




0CD03 20 


00000 12006 B 


01265 20 


00000 


12006 




0CD04 20 00006 00106 B 


01266 


20 00006 


00106 




0CD05 60 10200 00027 B 
0CD06 20 60010 00416 B 


01267 60 
01270 20 


10200 
60010 


00027 
00416 


> DICTIONARY I 


0CD07 21 


00140 00006 B 


01271 


21 


00140 


00006 




0CD08 30 00000 44006- B 


01272 


30 


00000 44006 




0CD09 20 02400 20006 B 


01273 


20 


02400 20006 




0CD10 22 


20001 00237 B 


01274 


22 


20001 


00237 




0CD11 20 05020 01006 B 


01275 20 


05020 


01006 

J 

27777 N 




0CD12 52 


76501 27777 B 


01276 


52 


76501 




0CD13 52 


76425 27777 B 


01277 


52 


76425 27777 




0CD14 76 


76401 27777 B 


01300 76 


76401 


27777 




0CD15 57 


76401 37777 B 


01301 


57 


76401 


37777 


> 

DICTIONARY II 


0CD16 52 
0CD17 72 


76401 37777 B 
76423 27777 B 


01302 
01303 


52 
72 


76401 
76423 


37777 
27777 


0CD18 52 


76545 27777 B 


01304 


52 


76545 27777 




0CD19 52 


76601 27777 B 


01305 


52 


76601 


27777 
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H 
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O 

ON 






0CD20 52 
0CD21 52 
0CD22 72 
0CD23 52 
0PT02 00 
0PT03 00 
0PT04 00 
0PT05 00 
0C100 00 



76411 27777 B 
76401 67777 B 
77525 27777 B 
76401 27777 B 
00000 01750 B 
00000 00144 B 
00000 00012 B 
00000 00001 B 
00000 00000 . 



01306 52 

01307 52 

01310 72 

01311 52 

01312 00 

01313 00 

01314 00 

01315 00 

01316 00 



76411 27777 
76401 67777 
77525 27777 
76401 27777 
00000 01750 
00000 00144 
00000 00012 
00000 00001 
00000 00000 



J 



CARD IMAGE FORMED HERE 
1316b - 1361b 



0C136 00 00000 00000 01361 00 00000 00000 



START XXXXX 

MEMORY SUM 
MEMORY SUM 



00000 45 00000 XXXXX 
40000 45 00000 XXXXX 

75202 00 00000 00123 

75203 77 64233 75420 



103 

10 2 
1 



10 



10 







START CARD 
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Figure 2: Wiring for line spacing and picking up Transfer Print Entry on 
alpha- numeric cards. 

1.. Numbers beside the pick up hubs of selectors are the digits from the first 
gj read of column 80 which are wired into these hubs via digit selector A, 

15 2. These co-selectors are used to print alpha-numeric columns 1-48 from 

either type wheels 1-48 when the selectors are normal or from type 
wheels 73-120 when these selectors are picked up. 

3. These co-selectors are picked up whenever Transfer Print Entry is not 

picked up. They, therefore, can be used as 10 extra positions for filter- 
ing special symbols in zero print control. 
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Figure 2i Wiring for line spacing and picking up Transfer Print Entry on 
alpha-numeric cards. 

1. Numbers beside the pick up hubs of selectors are the digits from the first 
read of column 80 which are wired into these hubs via digit selector A. 

2. These co-selectors are used to print alpha-numeric columns 1-48 from 
either type wheels 1-48 when the selectors are normal or from type 
wheels 73-120 when these selectors are picked up. 

3. These co-selectors are picked up whenever Transfer Print Entry is not 
picked up. They, therefore, can be used as 10 extra positions for filter- 
ing special symbols in zero print control. 
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v.iuvz ca::d3 proving ground 

Computing Branch, FDL 



Prepared by_ K ._R .JJ -Ki t or 
KKA iliijj'iiiijor 



Date 26 Jan 1956 



Uset 



Title Octal Card Read 

Read into Computer cards punched In octal form. Cards can 
have any number of words from 1 to 6. Cards used for this 
program can also be listed on tabulator a3 well as read 
into machine. If no. of words on card are 6, columns 1 
thru 72 must have one punch In each column and columns 73 
to 77 must have one punch. If a column Is missed, the 
program will come to a stop indicating an error on the 
card. This does not apply if all the words in a field 
are 0. Then that field can be blank. Program will stop 
after one blank card is read. For no. of words less than 
6, only the columns needed have to be punched* Program 
requires 1 blank card at bottom of deck of cards and sev- 
eral blanks on top. Insert for words is punched in col* 
umns 75 thru 77 and number of words in column 80. 

1. F.l Switch In 00000 Position 



Initial State i 



2. Set PAK to 45200 

3. If operation a card at a time is desired select MS 1. 
Words will not be placed in storage until next card is run 

Temporary Storage: 00000 to 00202 

Entrance Address? 45200 

Restrictions! Will not load into ES from 00000 to 00202. 



H 

A 
A 



1*5200 75 30203 00062 



WG-119 
-1- 



block transfer to ES 





45201 


11 45202 00000 






00000 


45202 


45 coooo 00062 


jump to start 


00001 


45203 


00 00000 00105 


EF i 


constants 


00002 


45204 


00 00000 00104 






00005 


45205 


00 00000 00100 






00004 


45206 


00 00000 00000 


row 


9 constant 


00005 


45207 


00 00000 00000 


row 


8 constant 


00006 


45210 


70 00000 00000 


row 


7 constant 


00007 


45211 


60 00000 00000 


row 


6 constant 


00010 


45212 


50 00000 00000 


row 


5 constant 


00011 


45213 


40 00000 00000 


row 


4 constant 


00012 


45214 


30 00000 00000 


row 


3 constant 


00013 


45215 


20 00000 00000 


row 


2 constant 


00014 


45216 


10 00000 00000 


row 


1 constant 


00015 


45217 


00 00000 00000 


row 


constant 


00016 


45220 


00 00000 00004 


Insert Index 


00017 


45221 


00 00000 00013 


digit Index 


00020 


45222 


00 00000 00012 


row 


index 


00021 


45223 


00 00000 00001 


field index 



a* 

rH 

H 

I 

CO 

I 

8 

ON 



00022 45224 00 00043 00000^ card image constants 

00023 45225 00 00044 00000 

00024 45226 00 00045 00000 

00025 45227 00 00046 00000 temp storage constant 
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(.00026 


45230 


00 00000 00002 


word Index 




00027 


45231 


00 00004 00000 


start of row constants 




00030 


45232 


00 00001 00000 


constant for advancing addresses 




00031 


45233 


00 30000 00000 


constant for repeat 




00032 


45234 


00 00000 00371 


field III constant 




00033 


45255 


00 30006 00000 


constant 




00034 


45236 


00 00000 00000 


conversion constant 




00035 


45237 


00 00000 00000 


j n for repeat 




00036 


45240 


00 00000 00000 


row index 




00037 


45241 


00 00000 00000 


digit index 




00040 


45242 


00 00000 00000 


field index 




00041 


45243 


00 00000 00000 


word index 




00042 


45244 


00 00000 00000 


insert index 




00043 


45245 


00 00000 ooood^ 


card image III 




00044 


45246 


00 00000 00000 [ 


r 11 




00045 


45247 


00 00000 oooooj 


II 




00046 


45250 


00 00000 oooooj 






00047 


45251 


00 00000 00000 I 






00050 


45252 


00 00000 00000 


>Temp storage for converted words 




00051 


45253 


00 00000 00000 






00052 


45254 


00 00000 00000 




o 

H 
H 


00053 


45255 


00 00000 00000^ 


1 


1 

O 

o 

H 


00054 


45256 


00 00000 00000 


insert address 


P* 


00055 


45257 


00 00000 00000 


no. of words on card 



8-229 
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field I addition 

field II addition 
field III addition 
blank 

position cards 

read 

set up repeat instruction 

set up transfer instruction 

store converted words away 

clear temporary storage 

set row index ( 

set up row constant field I 

set up row constant field II 

set up row constant for 2nd and 3rd words 

set up for no. of words 

jump to read subroutine 

00101 45303 37 00202 00136 jump to conversion subroutine 



00056 


45260 


00 oocoo 00000 


00057 


45261 


00 00000 ocooo 


00060 


45262 


CO 00000 00000 


00061 


45263 


00 00000 00000 


00062 


45264 


17 00000 00002 


00063 


45265 


17 00000 00002 


00064 


45266 


17 ccooo 00001 


OOO65 


45267 


15 00035 00067 


00066 


45270 


16 00054 00070 


OOO67 


45271 


75 00000 00071 


00070 


45272 


11 ooo46 00000 


00071 


45273 


75 10013 00073 


00072 


45274 


11 00004 00046 


00073 


45275 


11 00020 00036 


0007^ 


45276 


15 00027 00141 


00075 


45277 


15 00027 00152 


00076 


45300 


15 00027 00160 


00077 


45301 


15 00027 00172 


00100 


45302 


37 00133 00125 



6 

H 

Pi 



'00102 45304 45 00000 00100 

/ 00103 45305 11 00031 00035 

00104 45306 11 00055 20000 

00105 45307 47 00106 00122 



jump to read subroutine 

puts no. of words in A 
tests for words 
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00106 



1*5310 51*. 0GC55 0C017 shift to U portion 





00107 45311 


21 00035 00055 


forms j n 




00110 45312 


43 00033 00112 


tests for less than 6 words 




00111 45313 


1*5 00000 00121 


jump to. next card 




00112 1*5311* 


11 00056 20000 


field I addition -^A 




00113 45315 


47 00120 00114 


Test for 




00114 45316 


11 C0057 20000 


field II addition -^ A 




00115 45317 


1*7 00120 00116 


Test for 




00116 1*5320 


11 00060 20000 


field III addition — ^ A 




00117 45321 


43 00032 00121 


test for proper addition 




00120 1*5322 


56 00000 00062 


Stop for error or end of cards 




00121. 1*5323 


45 00000 ooo64 


back to next card 




00122 1*5324 

00123 45325 


75 00004 00124 Y 

17 00000 00003 j 


clear read side 




00124 45326 


45 00000 00120 


jump to stop 




00125 45327 


76 00000 00043 






00126 45330 


76 10000 0001*4 


read subroutine 




00127 45331 


76 10000 00045 






00130 45332 


21 00056 00044 


field addition I 




00131 45333 


21 00057 00045 


field addition II 




H 


00132 45334 


21 OOC60 00043 


field addition HI 


to 

A 

O 

1 O 
H 


00133 45335 


41 00036 30000 


row index 


O 

(X, 


00134 45336 


56 10000 00103 


optional stop after every card 



00135 45337 45 00000 00103 superfluous 

conversion subroutine 
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00136 45340 15 00C23 GQ142 puts field I Iri transfer 



o 

r-i 
H 

th 
I 

O 
O 

o 

Pi 



00137 45341 15 00025 00146 

00140 45342 11 00021 00040 

00141 45343 11 02000 00034 

00142 45344 11 30000 10000 

00143 45345 H 00026 00041 

00144 45346 11 00017 00037 

00145 45347 44 00146 00147 

00146 45350 21 02000 00034 

00147 45351 31 00034 00105" 

00150 45352 XI 20000 00034 

00151 45353 41 00037 00145 

00152 45354 11 02000 00034 

00153 45355 21 00146 00030 

00154 45356 41 00041 00144 

00155 45357 15 00024 00142 

00156 45360 41 00040 00141 
00.157 45361 55 00043 00034 

00160 45362 11 02000 00034 

00161 li.5363 31 00034 00063 % 

00162 45364 11 20000 00034_ 

00163 45365 11 00016 00042 

00164 45366 44 OOI65 00166 

00165 45367 21 00054 00034 



puts lat conversion address in place 

sets field index 

puts conversion constant in temp storage 

puts field I in Q 

sets word counter 

sets digit counter 

check for 1 

adds converted digit to cell 

positions conversion constant 

digit index 

sets conversion cell for 2nd word 

adds 1 to temp storage address 

word index 

puts field II word in place 

field index 

shifts field III word 

conversion word to temp storage 

positions conversion constant 

sets insert index 

check for 1 

adds converted digit to temp storage 
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o 

H 

H 

i 

I 

o 
o 
o 






00166 ^5370 51 coo>'+ 00105 

00167 ^5371 11 20000 0003^ 

00170 ^5372 kl 000^2 00l61f 

00171 **5373 55 10000 00002 

00172 iv557^ 31 00000 cooVf 

00173 ^5375 11 20000 0003k 

0017^ ^5376 kk 00175 00176 

00175 *5377 21 00055 0003^ 

00176 J^oo 21 ooiia 00030 

00177 fc^Ol 21 00152 00030 

00200 1*5^02 21 00160 000>0 

00201 ^5^03 21 00172 00030 

00202 k^kck ^5 00000 30000 



shifts constant and puts it away 

insert Index 

shift pattern for no, of words 

positions conversion constant 

check for 1 

adds to terap storage 

adds 1 to change conversion constant 



jump back to main routine 
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Prepared b y L. Graham 
Checked by 



Computer 

Checked by L« Graham 
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WHITE SANDS PROVING GROUIJD 
Ccmputinc Branch, FDL 



Date 20 Jan 1956 



Use: 



Initial State i 



Title Octal Card Dump 
Dumps 3 octal words on each Field I and Field II $ and the 
Insert address for ttie card is punched In cols . 73-77 tno . 
Set IA In U of Q, and No. words set in V of Q, PAK at 
5Y500 Y*l or 2 
Set not to read row 12. 
Will dump Drum from 40000 - 77777 • 

If Y-l, will dump ES from 00000-00^77 and 00710-01777 . 
If Y=2, will dump ES from 00000-01^77 and 01710-01777, 
Program must operate from ES. 



Range i 



Limitation; 



o 
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¥3-120 
Drum ES 

5Y502 0X500 17 00000 0X603 Pick punch card 

5Y503 0X501 17 00000 0X603 Pick punch card 

5Y504 0X502 11 10000 0X605 (Q) - (lA^ 1 ^ + N -* 0X605 

5Y505 0X503 11 0X617 0X606^ clear both cells 

5Y506 0X504 11 0X617 0X607_ 

5Y507 0X505 16 OX605 OX606 N -> V of OX606 

5Y510 0X506 15 0X605 0X607 TA -* U of 0X607 

5Y5H 0X507 11 0X606 20000 N -» A 

5Y512 0X510 73 0X610 0X612 N/6 « n-1 -* OX615 

5Y513 0X511' 47 0X512 0X513 Test remainder for zero 

5Y514 0X512 11 20000 0X707 No. words on last card 

5Y515 0X513 21 0X612 0X614 counter « n for No. of cards. 

5Y516 0X514 15 0X605 0X516 

5Y517 0X515 75 30006 0X5171 0X600 

5Y520 0X516 ll[30000]0X631JTran3fer 6 words to be punched 0X514 

5Y521 0X517 15 0X516 0X637 

5Y522 0X520 17 00000 0XGQ4 Pick punch card, and punch 

5Y523 0X521 15 0X627 0X532 

5Y524 0X522 15 0X624 0X526 / 

5Y525 0X523 110X614 0X640 1 -»OX64o. counter for Fields 

5Y526 0X524 75 10041 0X527} 

o 5Y527 0X525 11 OX617 0X646J clear card image 

H 

ti 5Y530 0X526 21 [0X675] 0X644 constant for forming card image 0X522 

§ 5Y531 0X527 11 0X613 0X645 0X546 

P 0X524 

g 5Y532 0X530 11 0X622 0X644 2^5 ^ Floating 1 1 



o-235 



W3-120 



Drum ES 

5Y533 0X531 11 OX615 0X642 counter for end of word 0X5^^ 

5Y534 0X532 11 0X637 0X643 0X521 

5Y535 0X533 11 0X526 0X540 0X5^2 

5Y536 0X534 55 0X643 00003 Shift No. to be punched 

5Y537 0X535 51 0X620 20000 

5Y540 0X536 54 20000 00017 

5Y5 J *1 0X537 35 0X540 0X540 

5Y5^2 0X540 21 OX665 0X644 

5Y543 0X541 55 0X644 00043 Shift floating 1 

5Y544 0X542 41 0X642 0X533 ! If word la not complete, jump 

5Y545 0X543 21 0X532 0X621 

5Y546 0X544 41 0X645 0X531 If a/held la completed, proceed 

5Y5^7 0X545 15 0X625 0X526 

5Y550 0X5^6 41 0X640 0X527 Jump to 0X527 unlesa fields I and II ^^ 

5Y551 0X547 15 OX626 0X526 

5Y552 0X550 11 OX623 0X642 counter » 4 to punch IA 

5Y553 0X551 11 0X622 0X644 Floating 1 

' 5Y55 1 * 0X552 55 0X644 00010 shift Floating 1 

5Y555 0X553 11 OX637 0X643 

5Y556 0X554 55 0X643 00006 (IA)2 2 * 

5Y557 0X555 11 0X526 0X562 0X564 

5Y560 0X556 55 0X643 00003 

5Y561 0X557 51 0X620 20000 

g 5Y562 0X560 54 20000 00017 

9 5Y563 0X561 35 OX562 OX562 



H 



x 

PL. 
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Drum E3 

5Y564 0X562 21 0X705 0X644 

5Y565 OX563 55 0X644 00043 Shift Floating 1 

5Y566 0X564 41 0X642 0X555 Test for counter of 4. 

5Y567 OX565 21 0X703 0X614 Add Into 6 rom, last column, 

5Y570 OX566 11 0X616 0X641 counter » 10 for 11 rows. 

5Y571 0X567 75 30003 0X571^ 

5Y572 0X570 16 0X624 0X571/ fix E6PS for 9 row 

5Y573 0x571 77 00000 30000 0X576 

5Y574 0X572 77 10000 30000 

5Y575 0X573 77 10000 30000 

5Y576 0X574 75 20003 0X576 

5Y577 0X575 23 0X571 0X614 

5Y600 0X576 41 0X641 0X571 Row counter 

5Y601 0X577 21 0X516 0X611 Increase next TA by 00006 

5Y602 0X600 4l 0X612 0X515 Jump back to punch another card, 

5Y603 0x601 56 00000 0X500 Stop. 

5Y604 0X602 00 00000 00000 

5Y605 0x603 00 00000 00110 

5Y606 0X604 00 00000 00112 

§ 5Y6Q7 0X605 00 30000 30000 (Q) 0X502 

• 5Y610 OX606 00 00000 00000 Temp. Storage N 

£ 5Y611 0X607 00 00000 00000 Temp. Storage (XA) 2*5 

2 5Y612 0X610 00 00000 00006 

5Y613 0X611 00 00006 00000 

5Y614 0X612 00 00000 00000 

5Y615 OX613 00 00000 00002 

5Y616 0X614 00 00000 00001 
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Brra F3 

5x5i7 c:c6i5 co occoo 00015 

5*620 0X616 CO OCCOO 00012 

5Y621 0X617 00 00000 OOOCO 

5i622 0X620 00 00000 00007 Cf £fiTrcKcXtoC 

51023 0X621 00 00001 00000 

5 r l52k 0X622 40 00000 OOCOO ploatirwj I ^ 

5Y625 0X623 00 00000 00004 

5Y626 0X624 00 0X647 0X706 

52627 0x625 00 0x662 0x660 

52630 0x626 ' 00 0x675 0x673 

5,1631 0x627 00 0x631 00000 



o 
I 

8 

a 

x 
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UJ-121 

WHITE SANDS PROVING GROUND 
Computing Branch 
Prepared by L. GRAH AM Page 



Chocked by Date 18 January 195 6 

Computer 

Checked by L. GRAHAM 

Title C heck o n HlfihJSpeod Punch 

wfa"c.h"'"P'un cfi'li % Bloctal 'rapes 

1. Read In check tape to 52700. 

2. Punch bloctal tape. 

3. Set PAK at 52700. 

Set Q at (IA) 2*5 + n * 

Place new bloctal tape In Reader. 

Start . 

4. As soon as New Tape is read In set PAK at 52713 . 
Turn printer on. 

Runs until 56 stop. 

Results Obtained: 

Any error In new punched tape will cause Printer to print 
correct word (an ES address) and Incorrect word. 

* If n ^ 1737, change V of 52710 and U of 52723 to a com- 
mon MD address. 
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5270 11 10C00 527-12 

52701 75 30013 00005 

52702 11 52703 00003 

52703 11 OOOll 10000 00005 
5270k 15 00012 00010 00004 

52705 5^ 00012 00017 00005 

52706 53 20000 0C007 00006 

52707 75 30000 ^5000 00007 

52710 11 00000 60000 00010 

52711 00 07777 00000 OOOll 

52712 00 70000 01520 00012 

52713 75 30030 00001 
5271k 11 52715 00001 

52715 11 52712 10000 00001 

52716 11 10000 00027 00002 

52717 15 10000 00010 00003 

52720 23 00030 00030 00004 

52721 16 10000 00030 00005 

H 52722 23 00030 00026 00006 

cA 

g 52723 11 60000 20000 00007 

£ 5272k k3 00000 00021 00010 

52725 11 00026 00032 00011 

52726 15 00007 00032 00012 

52727 11 00032 10000 00015 



8-24-0 



U3^12l 



i 

CO 



o 






52750 57 50644 50500 00014 

52731 11 OC026 00032 00015 

52732 15 00010 00032 00016 

52733 11 00032 10000 00017 
5273** '37 50644 50500 00020 

52735 21 00007 00025 00021 

52736 21 00010 00025 00022 

52737 4l 00030 00007 00025 

52740 56 00000 70000 00024 

52741 00 00001 00000 00025 

52742 00 00000 00001 00026 

52743 00 00000 oooco 00027 
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h POINT IAGRANGE IHTERPOUTIOH STJBROUTIHE CW 002 

This subroutine may be used to interpolate in a tabulated Amotion of one 
or two variables (one way or two way interpolation* reepectiyely) . There are 
two entranoes to this subroutine, one for one way interpolation, the other for 
two way interpolation* 

Third order interpolation is effeoted by the use of the Lagrange inter- 
polation formula for four points* The four points are found by table lookup 
and t where the table permits # these points are chosen such that two points lie 
on either side of the interpolated value. In the case of two way interpolation* 
16 tabular values are selected such that the interpolated point (x # y) is as 
olose to the oenter of the array pictured below as the table permits t 

I3 ° ° ° ^ 



r o 



% o— 



1, 



I 
% 



, 



Four interpolations are made in the x dlreotion in order to find F(x,y ), F(it uj 
H* 7)0 H*,jJ)* Using these four points, a final Interpolation is made 
in the y direction to find F(x,y)« 
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The four point Lagrange formula, 












Is used for two reasons t 

!• Uniform interval of tabulation is not necessarythus, whore the 
function behaves badly the points of tabulation may be taken 
clo8« together, and conversely, where the function is smooth 
fewer points need be tabulated* 
2* Four points appear to be reasonable compromise between speed of 
computation and aocuraoy* 
This subroutine requires the following information! 
1* Table of .function values j F(x) or P(k,y). 
2» Table of values of x. 

3* Table of values of y (for two way interpolation). 
If these numbers are stored on MD it is suggested that they be stored 
in the following sequonoe in order to minimise eocoes time. 

All y values, all x values, all F(x,y) values, 

y values and x values must be stored in ascending orders xo, x ...x . 

o*?\f»7 n * F (*,y) stored as fallows • 

*(*.» yj. '(«,. yj#—s *(*L. y«i). P(x.. yi)...., T(x„, yj,..., F(x.,yJ 
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If interpolation outside the tabular values- -( extrapolation) la attempted, 
thin subroutine prints out "rtrap" and exits to the alarm routine with y in 
(L) and x in (R). 

In case of a divide fault, set (P A K} 5 and start* The subroutine 
prints out "oflo* and exits to the alarm routine with y in (L) and x in (R). 
A divide fault will occur if the tabular values of F(x,y) are scaled too 
large with respect to ratios of differences in the independent variable* 



One can estimate an optimum scaling for F(x) by taking into account the 
order of computation of intermediate results: 



/ / Fix) A* 



4- • • • CTC, 




If F represents the maximum value of F(x) in some region of four 



consecutive tabulated points, and 



yj— represents the maximum ratio of 



differences in the independent variable- in this region, then F£ S 4^ <£** 

Cka*! 
should be a reasonable estimation of the condition for no overflow. The 

value of s (scale factor of F(x))i« then estimated by the following. 



S C5S"-Lo^(p AR) 



Re.caling of F(x) and/or retabulation or points would be necessary to 
eliminate any overflow that does occur. 

. The subroutine is entered by means of a return Jump command which proceed* 

&>2kk 
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two parameter words. The value a of x and y are placed In (%) and (Q) # 


respectively, before entry. The subroutine exits to the command following 


the seoond parameter word. F(x,y) is in (A) upon exit. 


1. One way interpolation 


Initali x in (a) 


Exeoutei c) 37 01001 01002 


e +*1) 00 xxxxx fffff 


e>2) CK HH000 00000 


e +3) Hext instruction 


Final i P(x) in (A) 

i 


2. Two way interpolation 


Initali x in (a) 


y in (£) 


Execute i c) 37 01000 01001 


e +1) 00 xxxxx fffff 


c t-2) Off NHnnn yyyyy 


o-4r3) Next instruction 


Final i F(x,y) in (a) 


PARAMETERS 


xxxxx address of first x value 


fffff address of first funotion value 


HHI nusaber of x values 


nna number of y values 


yyyyy address of first y value 
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This subroutine does not ute the constant pool or temporary pool* 



Subroutine length—-*™-— -•••——••— . 
(Including oonetantt) 

Temporaries required—--————-— 

Total working space-—— —————— —-« 

lumber of worda for assembly modification* 



(207) * (135) 
8 10 



-(35) 



8 



(29) 



10 



.(2W) » (I6h) 
8 10 

•(173) * (123) 
8 10 



0—246 
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DETERMINANT VALUATION PACKAGE-REAL-CA 010 

This is a package including Floating Point Real Arithmetic, CA 001 an 
interpretive routine for the real arithmetic and the real determinant 
evaluation routine. It is coded in standard form and can be assembly modified. 
If this package is assembled at 0100, it will evaluate an NX N determinant 
for N» (22)qs(18) 1 q» Each element of the determinant takes two (2) cells, and 
the entire determinant must be in ES. This routine requires a setting up for 
particular N, location of determinant in ES, and the location of the result in 
ES, and can not be used for any other N, determinant location, or result location 
unless the routine is restored to its original form and set up again. Any 
number of determinants may be evaluated for a given set-up. The determinant 
is destroyed during the evaluation. The elimination method is used. 

Steps of Elimination t 

1. 1— >(Det. value location). 

2. ^L j»2, 3f*9 H (if a 11 *o exchange row 1 with a row which 

11 AX 

has a non-zero first element, and change the sign of (Det. 
value location). 

3.- A ij-A n ^ h 1-2, 3,..., N. 

k* (Det. value location) A,,— -^(Det. value looation) 

5. Reduce the order of the resulting matrix by one by removing 
fr^m consideration row one, and col. 1. 

6. Repeat steps 2-5 until order of the matrix is reduced to one. 
This routine uses 2 N cells (one row) immediately following the 

determinant aB temporary storage. After it is set up, the last (I±6)^q»(56)o 
cells of the routine are no longer used (from 13^0-1^16). The amount of 
storage needed for the determinant is given by 2(N^fH). The elements of 
the matrix must be stored by rows. a.oL.7 
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The real arithmetic* f or the re*l arithmetic and interpretive routine may 
be used Independent of the determinant routine by chooeinf th* proper -ntrancea. 

For instructions on the use of real arithmetic *ee Ck 001. The interpretive 
routine performs the real arithmetic operations referring to a parameter word 
for the locations of the mentis oaa of the operands and result. 

REAL ARITHMETIC ENTRANCE 
Co 37 01001 01002 Add Ent 
Co 37 01001 01003 Vult Ent 
Co 57 01001 0100)i Div Ent 

INTERPRETIVE ROUTINE ENTRANCE 

Co 37 01001 ppppp 

C AAAA B^P? CCCC 

TJhere operations performed aret 

Add (a)/(p)— ^(C) P*1106 

Subt (A)-(B)— >(C) P-1110 

Mult (A)X(B) — *{C) P*1112 

Div (A)-r(K) — *{C) P*11lU 
Where AAAA-locatlon of mantissa of let operand 

BBBB-location of mantissa of 2nd operand 

CCCC-location of mantissa of result 

DETERMINANT SET-UP ENTRANCE 

Co 37 01001 01153 

C DDDD RRRR NNNN 
Where DDDD- location of Dot, in ES 

RRRR-location of result in ES 

NNNN ordor of the determinant (octal) 
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DETERMINANT EVALUATION ENTRANCE 

Co 37 01001 01153 

Permanent const, used I|0, fU, 77, U3» 66, U4* 
Temp, storage 00005-00032, (A), (Q) 
Commands for assembly modification hOJa (263K A 
Drum Addresi!-70723-713U0 
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10123 
70724 
70725 
7 n 726 
70727 
70730 
70731 
70732 
70733 
70734 
70735 
70736 
70737 
70740 
7^741 
70742 
70743 
70744 

70745 

70746 
70747 

70750 

70751 

70752 

70753 

70754 

70755 

70756 

70757 

70760 

70761 



01000 

01001 

01002 
01003 
01004 
01005 
0100A 
01007 
01010 
01011 
01012 
01013 
01014 
01015 
O1016 
01017 
01020 
01021 

01022 

01023 
01024 

01025 

01026 

01027 

01030 

01031 

01032 

01033 

01034 

01035 

01036 



37 76000 
45 00000 
45 00000 
45 O0000 
11 00027 
47 01006 
11 P0o™ 

47 01014 
11 00040 

11 00040 
37 01012 
45 00000 
54 20000 

73 00027 
VI Ofcuo 

74 10000 

11 20000 

23 00026 

11. 00095 

47 01025 
21 00026 

11 00026 

45 00000 

11 00025 

47 01031 

11 00027 

47 01036 

11 00025 

11 00026 

45 00000 

11 00026 



76002 
30O00 
O1027 
01073 
20000 
01000 
2O0O0 
01010 
00031 
00032 
01013 
01001 
00042 
10000 
AOO*>* 
0002 5 
00031 
00030 
20000 

01024 
00074 

00032 

01012 

20000 

01051 

20000 

01033 

00031 

00032 

01012 

20O00 



ALARM EXIT 
EXIT 

ADD ENTRANCE 

MULTIPLY FMTRANCF 
DIVIDE ENTRANCE M (0° 2^"^(a) 
DIVIDING p # y 0? 
NO'. NMfMFRATOR — ?(\) 

numerator =0? 
yes; 

> ANSWER 



S.9 



EXIT 



JUMP TO EXIT 



3* 



no: m (numerator) x 2 — ^ (a) 

QUOTIENT X 2 3V > (0) 

^ oq 

NORMALIZE IF(00025)=^0 OR 71 

NORMAL I Z ED MANTISSA STORED 

DIEF OF EXP. ^(00026) 

H >A 

H ■= 0? ' 

H — CORRECTFD 

H = 71 EXP— > 00032 

JUMP TO EXIT 

ADDITION m(0PF9AND i)-^(a) 

M (OPERAND 1) - °? 

no: m (operand 2) -^(a) 
m (operand 2) = 0? 

YES; m (OPERAND ll -^ MfAN'SWE 1 ?) 
E (OPFRAND l) -^ E (VISV/ER) 
JUMP TO EXIT 
NO'. E (OPERAND i]~^(a) 



j+j 
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OJ 

i 

8 

0-i 



70762 


01037 


36 


00030 


00032 


70763 


01040 


46 


01047 


01041 


70764 


01041 


11 


00025 


20000 


70765 


01042 


11 


00027 


00025 


70766 


01043 


11 


20000 


00027 


70767 


01044 


11 


00026 


20000 


70770 


01045 


11 


00030 


00260 


70771 


01046 


11 


20000 


00030 


7C5772 


01047 


12 


00032 


20000 


70773 


01050 


42 


01072 


01.054 


70774 


01051 


11 


00027 


00031 


70775 


0105? 


11 


00030 


00032 


70776 


01053 


45 


00000 


01012 


70777 


01054 


16 


20000 


01055 


71000 


01055 


54 


00027 


30^00 


71001 


01056 


35 


00025 


20000 


71002 


01057 


11 


00040 


00032 


71003 


01060 


74 


20000 


00032 


71004 


01061 


11 


20000 


00031 


71005 


01062 


47 


01064 


01063 


71006 


01063 


13 


00032 


00026 


71007 


01064 


11 


00032 


20000 


71010 


01065 


42 


01071 


01067 


71011 


01066 


23 


00026 


00077 


71012 


01067 


21 


00032 


00026 


.71013 


01070 


45 


00000 


01012 


71014 


01071 


00 


00000 


00*46 


71015 


^01072 


00 


00000 


00*43 


71016 


01073 


71 


00025 


00027 


71017 


01074 


11 


00040 


00025 



E(0P lj MINUS E(0P2)- K-> (00032) 
* > °f > 

yes: exchange 

OPERAND 
ONE 

AND 

TWO 

no: |k| ->(a) 

|K| < 35 7 

|K| > 35 OR .M(0Pj 1=0 
(OP 2)-^>ANSWER 

JUMP TO EXIT 
|K| < 35? SET SHIFT OF 5 BITS 

M(0P?JX P } »(Aj 

M(0P2|X 2* + M(OPl) -»(A) 

-^> (0©03 2) 

NORMALIZE M (ANS)- H->(00032) 

M(ANS)->(00<m) 

M(ANS) = ? 

YES.* -M->(p0026) 

no: h-»(a) 

H < 38 J 

NO:e<;OPl)-32-^(00026j 

YtS'. E(0P1) PLUS H (PR H-72J 

JUMP TO EXIT 

DEC 38 

DEC 35 

MULT M(0P1)X M(OP 2)-*(A ) 

0->(00«2$) 



FOItM NO t. T . I V) f 
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<A 



71020 


01075 


74 


20000 


00025 


NORMALIZE M(ANS)-34 


OR 35— » 


H 


71021 


01076 


11 


20000 


00031 


MfAN5/->(0003l) 






71022 


01077 


47 


01102 


01100 


M(ANS) =0? 






71023 


01100 


11 


00040 


00032 


yes; A - E^ANS) 






71024 


01101 


45 


00000 


01012 


JUMP TO EXIT 






71025 


01102 


23 


00025 


0107? 


NO: H-35~> (00025)- 


o«* -1 




71026 


01103 


21 


00026 


00030 


E£0P1)PLUS E^OP 2)-»^A}*(00026 


) 


71027 


01104 


35 


00025 


00032 


E (ANS) -*(00O32) 






71030 


01105 


45 


00000 


01012 


JUMP TO EXIT 






71031 


01106 


16 


01147 


01134^) 


ADO 






71032 


01107 


45 


00000 


01115) 


ENTRANCE 






71033 


OHIO 


16 


01151 


0113£> 


SUBTRACT 






71034 


01111 


45 


00000 


OUI5) 


ENTRANCE 






71033 


01112 


16 


01150 


01134) 


MULTIPLY 






71036 


0X113 


45 


00000 


01115) 


ENTRANCE 






71037 


01114 


16 


01146 


01134 


DIVIDE FNTPANCE 






71040 


01115 


31 


01001 


00017 


SET 






71041 


01116 


15 


20000 


01117 


PARAMETER 






71042 


01117 


11 


00000 


01132 


LOCATION 






71043 


01120 


55 


01144 


10003 


SET 






71044 


01121 


53 


01152 


01116 


L (Z) 






71045 


01122 


55 


01152 


00033 


SET 






71046 


01123 


55 


01145 


10003 


L (X) 






71047 


01124 


53 


01152 


01131 








71030 


01125 


54 


01152 


00014 


SET 






71051 


01126 


33 


01152 


01133 


L(Y) 






71052 


01127 


21 


01001 


00074 


UP EXIT LOG 






71053 


01130 


75 


30002 


01132 


X -> 






71054 


01131 


11 


00000 


00025 


(OP \\ 






71055 


01132 


75 


30002 


01134 


Y ~> 







(X, 



8-7*0 
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CV-123 



en 



71056 


01133 


11 


00000 


00027 


(OP 2) 


71057 


01134 


37 


01012 


00000 


REAL ARITH# JUMP 


71060 


01135 


75 


.30002 


01137 


ANSWER 


71061 


01136 


11 


00031 


00000 


V(Z) 


71062 


01137 


37 


01137 


01140 


s.r. exit 


71063 


01140 


45 


00000 


01001 


JUMP TO EXIT 


71064 


01141 


13 


00027 


00027 


- (00027)-> (00027) 


71065 


01142 


37 


01012 


01002 


JUMP TO SUB 


71066 


01143 


45 


00000 


01135 


JUMP TO STORE (ANS)^ EXIT 


71067 


01144 


70 


00000 


00777 


MASK - 


71070 


01145 


00 


00777 


70000 


MASK 


71071 


01146 


00 


00000 


01004 




71072 


01147 


00 


00000 


01002 




71073 


01150 


00 


00000 


01003 




71074 


01151 


00 


00000 


01141 




71075 


0115? 


00 


00000 






71076 


01153 


45 


00000 


01303 


SET UP S. P. ENTRY 


71077 


01154 


15 


01405 


01115 


SET PARAMETER IOC 

SET L (All)X 2^(01174) 


71100 


01155 


15 


01323 


01174 


71101 


01156 


15 


01323 


01177 


SET L(Alll)'2'-*(0U77) 


71102 


01157 


11 


01322 


01225 


SET L(A12 All A12"! 


71103 


01160 


11 


01306 


0124? 


SET L(A1? A?l T?) 


71104 


01161 


11 


01307 


01244 


SET t(A22 T2 A22} 


71105 


01162 


11 


0132? 


01255 


SET Ifa All A22) 


71106 


01163 


11 


00066 


00003 


l-> 


71107 


01164 


11 


00074 


00004 


(ni 


71110 


01165 


11 


01302 


01337 


STORE 2X2*V 4 


71111 


01166 


11 


01314 


01336 


STORE 2(N-l)' 2** 


71112 


01167 


75 


30006 


01171 


STORE C0PYS 


71113 


01170 


11 


01302 


013?5 , 


2N X 7^ 
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71114 


01171 


n 


on?5 


ntm 


N-1 




71115 


01172 


11 


01305 


01333 


INDEX r N-2 




71116 


01173 


11 


01327 


01334 


INDEX- N-1 




71117 


01174 


11 


00000 


20000 


(A11)-»A 




71120 


01175 


47 


01217 


01166 


A = 0? 




71121 


01176 


75 


30000 


01200 


YES'. ROW 1 




71122 


01177 


11 


00000 


00000 


— > tTEMP ROW) 




71123 


01200 


15 


01177 


01205 


STORE 




71124 


01201 


21 


01205 


01326 


L(R0W 2) 




71125 


01202 


55 


01177 


20025 


STORE 




71126 


01203 


16 


10000 


01205 


L (R0W1) 




71127 


01204 


75 


30000 


01206 


ROW 2 




71130 


01205 


11 


00000 


00000 


— > ROW 1 




71131 


01206 


55 


01205 


20025 


STORE 




71132 


01207 


16 


10000 


01211 


L(R0W 2) 




71133 


01210 


75 


30000 


01212 


ROW 1 (TEMP ROW) 




71134 


01211 


11 


00000 


00000 


—> ROW 2 




71135 


01212 


13 


00003 


00003 


^TlH>(TiV 




71136 


01213 


21 


01326 


01303 


2NX2 /ir T 2NX?° 




71137 


01214 


41 


01334 


01174 


TEST NEW All 




71140 


01215 


75 


1000? 


01277 


COL 1=0 




71141 


01216 


11 


00040 


00003 


o-» |det| JUMP TO EXIT 




71142 


01217 


11 


01303 


01326 


COU =■ RESTORE CONSTANT 




71143 


01220 


23 


01327 


00074 


INDEX - 1 




71144 


01221 


21 


01177 


01303 


SET FOR 




71145 


01222 


21 


01174 


01312 


NEXT ROW 




71146 


01223 


11 


01330 


01334 


SET INDEX = N-1 




71147 


01224 


37 


01137 


01114 




9 

a 


71150 


01225 


00 


00000 




A12/A11 ^ (A) 


71151 


01226 


21 


01223 


01302 


SET FOR AU 



i^-v 
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3 



71152 


01227 


41 


01334 


01224 


R/All 


71153 


01230 


11 


01330 


01334 


SET INDEX-N -2 


71154 


01231 


11 


01330 


01335 


SET INOEX^N-2 


71155 


01232 


31 


0124? 


0000? 


SFT 


71156 


01233 


11 


01324 


10000 


L (A?l) 


71157 


01234 


53 


20000 


01235 




71160 


01235 


11 


00000 


20000 


(a?i)-*(a ) 


71161 


01236 


47 


01241 


01237 


(A21) = 0? 


71162 


01237 


21 


01244 


01317 


YES* SET FOR NEXT ROW 


71163 


01240 


45 


00000 


01252 


JUMP TO SKIP ROW 


71164 


01241 


37 


01137 


01112 


no; X 


71165 


01242 


00 


00000 


00 # 


A12 X A21-> T 


71166 


01?43 


37 


om7 


OHIO 




71167 


01244 


00 


00000 


00 * 


A22-(A22 A2l)— > A22 


71170 


01245 


21 


01242 


01301 


SET FOR A13 


71171 


01246 


*21 


01244 


01302 


SET FOR A23 


71172 


01247 


41 


01335 


01241 


-» 1 COL 


71173 


01250 


23 


om? 


01336 




71174 


01251 


21 


01244 


01337 




71175 


01252 


21 


01242 


01310 




71176 


01253 


41 


01334 


01231 


1ST COL 1* 0*0 


71177' 


01254 


37 


01137 


0111? 


X 


71200 


01255 


00 


00000 


qOOoO 


(t) (auV> t 


71201 


01256 


23 


01330 


00074 


index -1 


71202 


01257 


23 


01336 


01301 


4(N+1>(^ 4 X 2 /2 - 


71203 


01260 


21 


01337 


01302 


4 • 2*% 4 < 2 /0 > 4 


71204 


01261 


21 


01255 


01311 


SET FOR A22 


71205 


01262 


21 


01331 


01315 


SET 


71206 


01263 


11 


01331 


01242 


PARAMETERS 


71207 


01264 


21 


01332 


01320 
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71210 


01265 


11 


013 32 


01244 






71211 


01266 


21 


013*5 


0130? 






71212 


01267 


21 


01225 


01325 






71213 


01270 


41 


01333 


01173 


DET REDUCED? 




71214 


01271 


11 


01255 


01273 


yes: 




71215 


01272 


37 


01137 


01112 


X 




7.1216 


01273 


00 


00000 




T — > |DE7| 




71217 


01274 


15 


01406 


01115 


reset int.s.r : 




71220 


01275 


15 


01406 


0U27 






71221 


01276 


75 


30002 


01001 


STORE 


• 


71222 


01277 


11 


00003 


00000 


|DET| </- EXIT 




71223 


O1300 


00 


00000 


20000 






71224 


01301 


00 


02000 


00000 






71225 


01302 


00 


02000 


0000? 






71226 


01303 


31 


01001 


00017 


S R SET UP ENT 




71227 


01304 


15 


20000 


01305 


SET(L) PARAMETER 




71230 


01305 


11 


00000 


01416 


PARAMETER^ (T) 




71231 


01306 


21 


01001 


00074 


EXIT PLUS 1 




71232 


01307 


11 


01410 


1.0000- 


MASK— > (O) 




71233 


01310 


51 


01416 


01153 


STORE N 




71234 


01311 


11 


01153 


01304 


STORE 




71235 


01312 


23 


01304 


00074 


N-l 




71236 


01313 


36 


00074 


01305 


STORE N-2 




71237 


01314 


71 


01300 


01153 


STORE 




71240 


01315 


11 


20000 


01310 


?N - 2*** 




71241 


01316 


55 


01310 


10003 


STORE 


3 


71242 


01317 


11 


10000 


01303 


2N - l' r 


71243 


01320 


35 


01300 


omi 


STORE 2(N+l) ' 2*r 


3 


71244 


01321 


54 


20000 


00003 


STORE 


s 

£ 


71245 


01322 


11 


20000 


0131? 


2(N+ l)-2 /jr 



$-2S& 
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71246 


01323 


11 


01153 


01313 


STORE 






71247 


01324 


21 


01313 


00074 


N +- 1 




71250 


01375 


71 


01301 


01153 


STOP!: 






71251 


01376 


11 


70000 


01314 


7NX 7 xV 




71252 


01327 


15 


01405 


01177 


SET S 


P 




71253 


01330 


35 


01301 


0131^ 


STORE 


2 (Nt-1) • 2^ 




71254 


01331 


11 


01311 


01316 


STORE 






71255 


01332 


21 


01316 


01307 


2X? 3 ^ 


?.(H f l) - 2-V2 




71256 


01333 


71 


01315 


01311 


STO&E 


2(/vr/ 2% 2 IN +-1) 




71257 


01334 


71 


00041 


01153 


STORE 






71260 


01335 


35 


01314 


01317 


2NX 2 


**+ 2N 




71261 


01336 


3 5 


01302 


01320 


■ STORE 


2(^+1)7*3- 2(N f I) 




71262 


01337 


23 


01314 


01301 


STORE 


2(N-lj. 2 X ? 




7126? 


01340 


11 


01417 


lOOOH 


mask— >(n ) 




71264 


01341 


11 


01414 


01306 


STORE 


L (T2) 




71265 


01342 


11 


01414 


01307 


STORE 


L (T2) 




71266 


01343 


5 3 


01416 


01306 


STORE 






71267 


01344 


53 


01416 


01307 


All 






71270 


01345 


55 


01416 


00030 








71271 


01346 


11 


01411 


10000 


MASK- 


-^ 




71272 


01347 


53 


01416 


01306 


STORE 


I (All) X 2 /e 




71273 


01350 


11 


01415 


01371 


STORE 


L (Tl)-2^ L (Tl) 




71274 


01351 


53 


01416 


01321 


STORE 


L(All)'2 /a * 




71275 


01352 


11 


01410 


10000 


MASK- 


->(o) 




71276 


01353 


53 


01416 


01277 


STORE 


l(M) 




71277 


01354 


55 


01416 


00030 








71300 


01355 


11 


01410 


10000 


MASK- 


-»(Q) 




71301 


01356 


11 


01306 


01372 








71302 
71303 


01357 
01360 


53 
53 


01416 
01416 


01322 
01307 


STORE 
L (All) 


I 



,/■*• 



& 
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CM 
H 



S 



71304 


01361 


55 


01416 


00017 




713,05 


01362 


11 


01407 


10000 


MASK — > (Oi 

STORE L (All) ?'** 


71306 


01363 


51 


01416 


01323 


71307 


01364 


21 


01322 


01302 


STORE L (A15 All A12 


71310 


01365 


21 


0:1306 


01310 




71311 


01366 


21 


01306 


01301 


STORE L f(A12 A21 T2J 


71312 


01367 


21 


01307 


01320 


STORE L (A22 T2 A22) 


71313 


01370 


11 


01413 


10000 


MASK— > (O) 


71314 


01371 


53 


01303 


01176 


SET 


71315 


01372 


53 


01303 


01204 


REPEAT 


71316 


01373 


53 


01303 


01?10 


COMMANDS 


71317 


01374 


15 


01323 


01211 


STORE L (,A'll) 


71320 


01375 


71 


01303 


01153 


2N X > A 


71321 


01376 


35 


01211 


01211 


STORE L (T ROV/)' 2 


71322 


01377 


55 


om c i 


20025 




713 23 


01400 


16 


10000 


01177 




71324 


01401 


11 


01404 


01153 


SET ENT JUMP 


71325 


0140? 


u 


01407 


01324 


STORE MASK 


71326 


01403 


45 


00000 


01001 


JUMP TO EXIT 


71327 


01404 


45 


OOHQO 


01154 




71330 


01405 


00 


01137 


00000 




71331 


01406 


00 


01001 


00000 




71332 


01407 


00 


07777 


00000 


' 


71333 


01410 


00 


00000 


07777 




71334 


01411 


00 


00777 


7O00O 




71335 


01412 


77 


77000 


00000 




71336 


01413 


00 


00777 


00000 




71337 


01414 


00 


00000 


70007 




71340 


01415 


00 


03000 


O0003 
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Notes on Timing of the Controlled Reproducer 



The controlled Reproducer punches or reads cards at a maximum rate 
of 120 cards per minute or 500 milliseconds per card. When the Reproducer 
is started, an electromagnetic clutch is energized and several shafts are 
turned through one revolution. Each revolution operates cams and mechanisms 
which execute an, 18 point sequence of operations called the "card cycle". 
During the first five points of a cycle a card is moved through the channel 
and positioned for reading or punching. The next 12 points process 12 rows 
of card information. Following the last row there is a final point before 
starting the next card cycle. 



The theoretical execution time for one point of this 18 point cycle is 
27.8 or ~rg milliseconds. Because of the mechanical nature of the equipment 
the theoretical time of 27.8 m.s. may not be realized for every point of a 
500 ms.* cycle. 



A' study of the computing times actually available during various portions 
of a card cycle has been made. Tests were run on four Reproducers. The tijsve 
available for computation was measured by determining the number of times an 
Inddx Jump instruction could be performed* without an 10 fault occuring. Each 
of the Reproducers was adjusted to psi&s cards at the rate of 120/min* 



Theoretical deputation r Time s 
punching consecutive cards: 



Consider a sequence for reading and 



EF - V 

Other ins true' tibW 

EW - 0V 

EW - IV 

EW - IV 

ER - 0V 

ER - IV 

ER - IV 

Other instructions 



Select Reproducer 

(interval 0) 
Write Field III 
Write FieJLd I 
Write Field II 
Read Field III 
Read Field I 
Read Field II 

(interval A) 




'Row 9 



Row 8 



<A 

1 

8 

0^ 
H 
J> 

a, 



Other instructions 

EF - V or EW, Field III 



Row 12 



(interval B) 

Select Reproducer for next card if 
"single card" mode or process Row 9 
if "free run" mode 



^im 1 7 



Sfi 
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Three intervals are available for computation: 

(A) The time between card rows (or clutch selection) 
■(B) The time from row 12 to the next External Function Instruction 
(C) The time from the External Function instruction to row 9 

(or clutch selection) 

The numbers used to designate the 18 points of the card cycle are not 
sequential. At the start of a cycle when the cards are at rest the Reproducer 
is at point M. Points H through 18 occur as the card moves through the channel 
to the next station. During each of the next 12 points a row of information 
is processed; these points are numbered, corresponding to the card rows, 9> 8, 
7, 6, 5, A, 3, 2, 0, 11, 12. The final point of the cycle is 13. See Figure 1 
for a diagram of the card cycle. 

(A) At the beginning of each of the 12 cycle points during which row infor- 
mation is processed, a row ENABLE occurs. This activates a timing device. 
In the case of pumchin^, if information is not loaded into IOB within ]^> ms. 
a NO INFORMATION fault results. In the case of reading, if information is 
not road out of IOB within 10 ms. a NO INFORMATION fault results. 

The NO INFORMATION fault will result only from a failure to process 
information for Field I in time. There is no fault to indicate a failure 
to process information for either Field III or Field II. Hence all External 
Write and External Read instructions for a given row should be programmed 
consecutively. (There is in fact a period of about 16 ms. following a cycle 
point during which information may be transferred between the computer and 
the Reproducer; thus there is time to process Field II following Field I.) 

The time from one ROW ENABLE to the next is theoretically 27.8 ms. Thus 
for programs which execute a punch and read, a punch, or a "normal read", 
there is theoretically available between rows about 27.6 ms. By a "normal 
read" is meant an External Read executed at the beginning of a cycle point. 
It is also possible to execute a "delayed read". After information has been 
loaded in the IOA or IOB registers it is possible to delay reading it out 
for 10 ms. after the cycle point. It is thus possible to program around 
36 ms. of computation between reading two successive rows. However, the 
interval available for computation following such a delayed read is at most 
27.6. Should the interval following a delayed read be shortened to 17.6 ms. 
it is then possible to execute another delayed read 36 rrs. later. See Figure 
• 2. In performing a punch and read operation it is mandatory that the External 
Reads follow immediately the External Writes since there is no NO INFORMATION 
g. fault protection on other than the External Write, Field I. Thus a delayed 
-a; read should be used only in a reading operation and not in a reading and 
oo punching operation. If a delayed read is executed on row 12 the interval from 
o row 12 to the clutch selection (EF instruction) must be decreased by 10 ms; 
oj if a delayed read is used on row 9 the interval f ron the clutch selection to 
J> row 9 may be increased by 10 ms. 

& 
a. 



r 
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(B) The time from the execution of the External Function instruction which 
selects the Controlled Reproducer to the clutch latch up is known as the 
clutch access tim e. Since there are two points at which the clutch may be 
latched, the access time may vary from to 250 ms.* In case consecutive 
card cycles are programmed, if the clutch selection is made within 17.6 ms. 
of the beginning of point 12 there will be no delay in latching the clutch. 
Otherwise the clutch may not latch up for as much as a half revolution or 
250 ms. If the Reproducer is programmed in the "single card" mode, one may 
of course include any amount of computation between row 12 and the External 
Function instruction fpr the next card cycle. However, if more than 10 ms. 
of computation takes place a delay of from to 250 ms. will be incurred in 
latching the clutch. 

(C) The time from the clutch selection to point 9 would appear to be 177 
milliseconds or 10 ms. of point 12 plus 6 X 27.8 ms. for points 13 through 

18. This interval is in fact longer because of a small amount of time required 
for the clutch to actually latch up. 

Actual Computation Times Because of the complex mechanical nature of the 
Controlled Reproducer, it is to be expected that there will be considerable 
variation from the theoretical times stated above. Consideration of the 
tabulated results of the timing trials has led to the following recommendations t 

(A) that no more than 24 ms. be programmed between card rows; 

(B) that no more than 170 ms. be programmed between the External Function 
instruction and the^ first External Read or External Writer for row 9; and 

(£)■ that if it Is desired not to lose time while the clutch is latched up 
for the next cycle no more than 10 ms. be programmed beti^reen row 12 and 
the External Function instruction for the following card cycle. 
A program whose timing is within these limits .is guaranteed to run. 

Single Field Reading and Writing It is possible, bub not advisable t 
to execute a single Bternal Read and/or a single External Write to process 
one field of information from a card row. In the case of reading, Field I 
only may be read provided nothing is punched in Field II. With the Reproducer * 
set for two-field operation, the first External Read will read from I0B infor- 
mation punched in Field I of row 9. The information from Field II will then 
be placed in IOB. If this information is not read out during the row 9 point, 
when row 8 is enabled the information from Field I of row 8 will be placed in 
IOB. The contents of IOB are now (Field II, row 9) ©(Field I, row 8) which 
equals (Field I, row 8) provided nothing is punched in Field II. In the case 
of writing, execution of a single External Write per row will punch in Field I 
the information loaded in IOB and punch in Field II the zeros resulting from 
clearing IOB. To program the Reproducer for either reading or writing with 
a single External Read or External Write instruction per row is exceedingly 
dangerous. For if the interval between External Read or External Write instruc- 
ts tions is not sufficiently long the information for a row may be punched in Field 
II of the proceeding row or read from Field II of the preceding row. Programmers 
a. should always code at least two External Read or External l^rite instruction per 

row and dump irrelevant information into a one register garbage pit. It is 
j well worth squandering the small additional storage to retain the fault protection* 

£ *Some Reproducers have a clutch which rray be latched at six points; in this 

case the access time is to 84. ms. &-*)£ I 



to 



St 

00 

o 



8:a 



Programming Rules The following rules are set forth to define normal 
programming of the Controlled Reproducer. Although methods of abnormally 
programming the Reproducer have been mentioned, programmers are urged not 
to code in these fashions. It must be emphasized that violation of any of 
the rules is dangerous. At the very least a programmer must thoroughly un- 
derstand the operation of the Reproducer. And it must not be assumed that 
the operation is adequately described in these notes. 

A complete discussion of normal programming of the Controlled Reproducer 
is included in the publications (A) The ERA 1103 Controlled Reproducer, 
PX71778'A and (B) The ERA 1103 Computer System, Section 6: Programming, 
PX 71209» The following list of rules for programming the Reproducer is 
not complete. It is designed to indicate the instances in which the coding 
is most likely to be faulty. 

Some Rules for Programming the Controlled Reproducer 

(1) All External Read and External Write instructions processing infor- 
mation for a given row should be consecutive. The External Write instruc- 
tions should precede the External Read instructions. 

(2) At most 24. milliseconds of computation should be programmed between 
card rows. If the Reproducer is FREE RUNIIIKG at most 180 milliseconds 
should be programmed between cards. At most 170 milliseconds should 
be programmed between the External Function instruction which selects 
the Reproducer and the External Read and/or External Write instructions 
for row 9* 

43) Either 3 or 2 External Read and/or External Write instructions should 
be programmed per card row, depending on whether Field III is being 
used or not. 
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Formation of USE - a Cooperative Organization of 1103A Users 

16 February 1956 

In December of 1955 the desire was expressed by several 1103A purchasers 
to form a cooperative organization of 1103A users. Accordingly, a meeting was 
held at the Ra mo -Woo Id ridge Corporation on December 19 and 20 to form such an 
organization. Attending were representatives of Boeing Airplane Company, 
Holloraan Air Force Base, Lockheed Missile Systems Division, Ramo-Wooldridge 
Corporation and Remington Rand Univac Division. 

The name USE - Univac Scientific Exchange - was selected for the organi- 
zation. A number of objectives for the group were listed. 

1. Exchange of programming techniques and ideas. 

2. Exchange of programs and subroutines. 

3. Exchange of information on computing organizations, operating 
procedures, etc. 

4. Adoption of a common programming language for exchanged programs. 

5. Adoption of a standard format for program write-ups. 

6. Adoption of standard subroutine conventions. 

7. Setting up of a cooperative manpower effort. 

8. Cooperation at the program planning stage. 

9. Achievement of a uniform general purpose system for the operation 
of all 1103A's. 

It was pointed out that Remington Rand is continuing the Central Exchange 
for 1103 and 1103A information. However, material in the Central Exchange is 
unsolicited and unedited. The philosophy has been to require no special language 
or format for Central Exchange material; this makes it easy to contribute mat- 
erial and to distribute it quickly. 

Membership in USE is open to any organization which is renting or has 
purchased or has a firm order for one or more Model 1103A computers. USE publi- 
cations will be available to 1103 and 1103A users only. These publications will 
be distributed to all 1103 and 1103 A installations. 

A structure of working committees was established. On January 9 and 10 
the committees met as guests of the Boeing Airplane Company in Seattle, Wash- 
ington. 

Specifications for a common language for the exchange of library programs 
were discussed. It was emphasized that a particular installation would in no 
sense be bound to use this common language internally. The common language is 
designed to be sufficiently general to include most other languages. A minimum 
assembly program for translating common- language routines to octal programs was 
described. Specifications were also proposed for subroutine format and standard 
program write-ups. 

Plans were made for immediate cooperation in achieving routines for the 
1103A. Investigations of existing routines were initiated to determine the 
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value of adapting such routines to the 1103A. In particular, common function 
routines from the Central Exchange and general matrix routines were to be 
surveyed. Assignments were made for the framing of specifications for minimum 
and ultimate data input and output routines. 

Discussions of a common compiling routine were begun. The goalis of suclii 
a compiler were listed as: 

Translation: Symbolic to octal 

Subroutine referencing 

Preparation for input and output formats 

Algebraic coding 

Storage assignment 

Automatic identification 

Scaling 

Automatic post-mortem and diagnd&is 

Arrangements were made for meetings; m? St. Paul on February 16 and 17 as 
guests of Remington Rand Univac Division*. 
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